Novos Instagramaveis
Tarssio
11/22/2020
Breve Descrição
Na nossa primeira análise percebemos que algumas hashtags acabavam por poluir o modelo de tópicos. Estas hashatgs estão ligadas a troca de likes ou de seguidores.
Faremos, a princípio, uma análise sobre elas:
exclude_id <- df %>%
select(id, body, `profille is private`,
`profille is private`, `profille is unpublished`,
num_comments, num_likes, accessibility_caption) %>%
filter(!is.na(body)) %>%
unnest_tokens(words, body, "tweets") %>%
mutate(words = str_to_lower(words)) %>%
filter(str_detect(words, "like|sdv|follow|insta|seguidores|sigo"))
tbl <- df %>%
select(id, body, `profille is private`,
`profille is private`, `profille is unpublished`,
num_comments, num_likes) %>%
filter(!is.na(body)) %>%
filter(!id %in% exclude_id$id)
clean_tbl <- tbl %>%
unnest_tokens(words, body, "tweets") %>%
filter(words != "#quarentena")Temos, entre as cerca de 10 mil publicações, 3635. Ou seja, um terço das publicações possuem hashtags como #likeforlikes, #sdv, #follow, #instafollow e etc.
Abaixo se encontra uma tabela com as hashtags mais utilizadas nestas publicações:
tokens_exclude <- all_tbl %>%
filter(id %in% exclude_id$id) %>%
unnest_tokens(words, body, "tweets") %>%
filter(!str_detect(words, "like|sdv|follow|insta|seguidores")) %>%
filter(str_detect(words, "^#"))
tokens_exclude %>%
group_by(words) %>%
summarise(n = n()) %>%
arrange(-n) %>%
top_n(50, n) %>%
kbl() %>%
kable_styling()| words | n |
|---|---|
| #quarentena | 4469 |
| #love | 978 |
| #sigodevolta | 945 |
| #juntosvamosvencer | 876 |
| #chuvasemlimite | 833 |
| #brasil | 814 |
| #amor | 610 |
| #bomdia | 368 |
| #boanoite | 340 |
| #photography | 340 |
| #fiqueemcasa | 339 |
| #happy | 316 |
| #bhfyp | 315 |
| #photooftheday | 312 |
| #vida | 311 |
| #tbt | 309 |
| #fotografia | 307 |
| #moda | 306 |
| #o | 299 |
| #a | 290 |
| #fashion | 285 |
| #makeup | 270 |
| #paz | 257 |
| #memesbrasil | 242 |
| #gratidao | 238 |
| #emcasa | 235 |
| #memes | 228 |
| #goodvibes | 223 |
| #deus | 213 |
| #felicidade | 212 |
| #tiktok | 212 |
| #tumblr | 210 |
| #cute | 200 |
| #f | 198 |
| #beautiful | 194 |
| #ficaemcasa | 193 |
| #maquiagem | 184 |
| #blogueira | 182 |
| #photo | 175 |
| #amorproprio | 174 |
| #modafeminina | 174 |
| #domingo | 166 |
| #riodejaneiro | 163 |
| #saopaulo | 156 |
| #style | 155 |
| #gratid | 153 |
| #frases | 150 |
| #girl | 148 |
| #mulher | 148 |
| #familia | 147 |
Modelo
Removendo aquelas publicações que possuem as hashtags supracitadas e rodando o modelo temos como palavra tipica de cada um dos tópicos:
load("stm_object.RData")
td_beta <- tidy(stm_object, matrix = "beta",
document_names = id)
td_beta %>%
group_by(term) %>%
filter(topic != 1) %>%
filter(beta == max(beta)) %>%
mutate(topic = as.factor(topic)) %>%
group_by(topic) %>%
top_n(7, beta) %>%
ggplot(aes(x = fct_reorder(term, beta), y = beta)) +
geom_col() +
coord_flip() +
theme_minimal() +
facet_wrap(~topic, nrow = 2, scales = "free") +
scale_color_gradient(low = "#8B5B7D",
high = "#B74327") 
Quanto aos textos, temos a seguinte proporção:
td_gamma <- tidy(stm_object, matrix = "gamma",
document_names = tbl$id)
td_gamma %>%
filter(topic != 1) %>%
group_by(document) %>%
filter(gamma == max(gamma)) %>%
group_by(topic) %>%
summarise(n = n(),
percentagem = round(n/nrow(.),2))## # A tibble: 3 x 3
## topic n percentagem
## <int> <int> <dbl>
## 1 2 3683 0.87
## 2 3 469 0.11
## 3 4 68 0.02Retornando alguns textos típicos:
td_gamma <- tidy(stm_object, matrix = "gamma",
document_names = tbl$id)
td_gamma %>%
rename(id = document) %>%
filter(topic != 1) %>%
group_by(id) %>%
filter(gamma == max(gamma)) %>%
group_by(topic) %>%
top_n(7,gamma) %>%
arrange(-gamma) %>%
left_join(tbl) %>%
select(id, topic, gamma, body) %>%
distinct(body, .keep_all = TRUE) %>%
kbl() %>%
kable_styling()| id | topic | gamma | body |
|---|---|---|---|
| CHnpOYHgmUU | 3 | 0.9538400 | Cartinha para o Papai Noel - Bibi na quarentena #quarentena |
| CHlRu-blAO5 | 3 | 0.9494224 |
ACREDITO NELES! TÔ COM ELES E NÃO DESISTO DELES! É AMANHÃ! 💛 Quem aí está confiante na vitória? Amanhã é dia de votarmos 51000 para que João Pessoa passe a viver Um Novo Diferente! Vamos juntos! 💪🏼🇧🇷 5️⃣1️⃣0️⃣0️⃣0️⃣✅ #UmNovoDiferente #MarcílioDoHBE #51000 E disse Deus: Haja luz; e houve luz. Gênesis 1:1-3 NORDESTINA ME RESPEITA ! Gratidão, 🍀 . . . 🙏🏼🌎🇧🇷🕊Ⓜ️🧿🎙🎧📼🌴 . . . #novembro #novembro2020 #novembroazul #novembrochegou #nordestinamerespeita #primavera #joaopessoa #jampa #nordeste #brasil #deus #gratidão #fé #phoyography #photo #photooftheday #bohostyle #wanderlust #produtora #vidadaneguinha #vidadeprodutora #mtnaprodução #produtorasdobrasil #quarentena Que a LUZ do ESPÍRITO SANTO, GUIE meus CAMINHOS e DECISÕES e que eu sempre tenha a INSPIRAÇÃO dos BONS IRMÃOS. 🌹 |
| CHnn0d6sya- | 3 | 0.9494224 |
📍Eita domingo puxado! 😀 Esse é o dia do descanso e realmente eu procuro fazer o menos possível ou nada, mas hoje foi exceção. Já fui buscar a @catanzaroalexia pra almoçar e já levei de volta. Tô morta, pois o dia foi bem atípico. Aqui quem comanda a cozinha é ela, então foi bem difícil pra mim. 😆 Cheguei, tomei um banho de mangueira pra refrescar, (amo 😍❤💙) agora não saiu mais de casa. Então vou descansar, assistir @kuwtk 👌😉😆😍…mais tarde vou fazer as unhas, raspar as pernas 😁tomar aquele banho, fazer um lanchinho com a Leka e o dia foi cumprido com sucesso! Esse post realmente me representa! Foi o tempo que eu gostava de bater perna, sair depois do trabalho, viajar, (e olha que eu viajava muito!) agora eu preso o meu lar, gosto de ficar em casa mais do que nunca. Eu amo me mudar e creio que em breve nos mudaremos mais uma vez, mas é sempre bom ter um cantinho pra chamar de seu. 😊 Posso dizer que essa #quarentena na minha opinião, pra minha vida, foi a melhor coisa que aconteceu. Graças a Deus eu não posso reclamar deste ano, embora meu coração sofra com o que eu vejo neste mundo todos os dias eu oro pra que seja feita a vontade do Pai. Muitos não tem um teto para se sentir seguro de alguma forma, 😦😥😔 então sou grata pois, feliz é quem tem um lar para retornar. 💕🏡 Um beijo 💋 e uma flor 🌹 de amor 💕 da ALê 📌Tem STORIES pra você. 😉 … #ale #chaves #catanzaro #emcasa #mensagem #jesus #corderosa #mudanca #mudar #realizar #realizacao #sonho #sonhos #aleit #ale #catanzaroale #alecatanzaro #chavesale #alechaves ♡ |
| CHoQU1IJF_m | 3 | 0.9494224 |
Cuide de sua saúde, enquanto seu filho brinca e aprende em nosso espaço Kids! Um local seguro para que você possa treinar tranquilo! Venha conhecer. #uplayfitness #uplay #fitness #quarentena #saude #bemestar #qualidadedevida #treino #treinoserio |
| CHlleIIHcFc | 3 | 0.9487093 |
Amizade além dos campos !!! Vc é um irmão @braz_airsoft Patrocinadores @taticoforce @fairsoft.oficial @uaifardasmg @bioattack Perfis recomendados @territorio.hunter @bruno_kaninos @braz_airsoft @matheus_oliveira_th @rog3r_airsoft_oficial @amelia_paixao @chapeuzinhovermelho_airsoft @oliveirasniper @brunoairsoft02 @invictustacticaloutdoor @brforce @leaomodelismooficial @mbootsbrasil #airsoftsports #airsoftsport #gunshot #brasil🇧🇷 #minasgerais🔺 #sp #airsoftminas #quarentena |
| CHnV8ZoAF41 | 3 | 0.9462017 |
Sigam: 🔸@thor_meme . . . . . . . . . . . #memes #memesbrasileiros #memesdobrasil #meme #memesmuitozueiros #memesengraçados #sam #southamericamemes #thormeme #zueira #zueirasemlimites #piada #engraçado #pramorrerderir #engraçados #humor #memesbr #southamericamemes #rir #risada #trocadilhos #terceiraguerramundial #covid #usa #estadosubidos. #bbb #bbb20 #quarentena #ourinhos #corona #coronavirus |
| CHm8uB1jn7s | 3 | 0.8818214 | O domingo vai ficar mais gostoso com um bobo de camarão na Rota. Das 12h30 às 20h30. Presencial e delivery! ☎️ 3666-8200 /3668-6222 / 2528-7304 / WhatsApp (11) 👉99173-2213 - 99613-5975. #ficadica #rotadoacarajé #delivery #culinariabaiana #gastronomiabrasileira #comerebeber #comidinhas #deliciasnafolha #santacecilia #higienopolis #vilabuarque #consolação #delivery #quarentena #isolamentosocial #acaraje |
| CHkbDonH03A | 2 | 0.4639369 |
Outono e covid: cenário perfeito pra filme distópico ⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀ ⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀ ⠀___________ #italia #italy #autunno #autumn #autumnvibes🍁 #autunno2020 #dametraveler #brasileirosporai #brasileirospelomundo #girlswhotravel #euvounajanela #sheisnotlost #wanderer #wanderlust #monzabrianza #worldnomads #globetrotter #italiainunoscatto #autumnfoliage #brasileirosnaitalia #vidanoexterior #morarfora #viagemeturismo #brasileirosnaeuropa #vivaitalia #viaggiatori #brasileirasnaitalia #quarantena #quarentena #zonarossa⠀⠀⠀⠀⠀ |
| CHlpcpVne-T | 2 | 0.4639369 | Aniversário se aproximando e entrando em um novo ciclo. Estou mais madura. Mais humana. Mais mulher. Sei muito mais o que eu quero e, principalmente, o que eu não quero em minha vida. Sei identificar as amizades que quero levar pra vida toda das que são só de alguns momentos. Procuro identificar a pessoa vai marcar a minha vida e que irá apenas passar por ela. Estou mais confiante. Mais corajosa. Embora as decepções sejam várias. Estamos vivendo um momento extremamente difícil, mas que no dia a dia procuro aprender, valorizar e ressignifica do meu jeito. . .📸 @kakaudumas _fotografia 🤍 . . . . #ressignificar #eupormim #momento #novociclo #aniversario #quarentena #emcasa #agradecida #contagemregressiva #reflexao #resiliencia #amor ##amoviajar # |
| CHoXm90pyV4 | 2 | 0.4639369 |
A meu ver, você está correto nesta disputa. Ou seria ao meu ver? Na verdade, o que é considerado mais correto de acordo com a maioria dos gramáticos e linguistas respeitados é “a meu ver”, sem o artigo “o”. Guia do estudante #dicadeportuguês #redaçãoporamor #comoestudar #competencia1 #enemnotamil #redacaonotamil #quarentena #dicaderedacao #vestibular2020 #uerj #escreverbem |
| CHlTJwkh1QI | 2 | 0.4529516 | e se eu te falar que achei um paraíso em cidreira? 😜 |
| CHlmA6AhKI3 | 2 | 0.4097328 |
[ Texto em 🇧🇷 nos comentários ] It arrived the time to share this beautiful film with you all. For more details please check the official page @thehiddensubject_sujeitooculto "How is your solitude? “2020, a lockdown year. Life goes on and in the meantime streaming and the internet carry on getting stronger and stronger for dialogues and relationships. My dear friend and Producer Tiago Di Mauro reminded me of our short The Hidden Subject, released not that long ago, which fits perfectly into the moment we are living in. The topic is hottest than ever. Loneliness, a disease of modern life is in everything and in everyone, behind our mobile phone screens, our headphones and now hidden behind our masks. The Hidden Subject is based on everything that was going on in the surroundings of my flat in Garcia, Salvador, from the loneliness of my neighbours and their TV noises, radios, cats, parties, fights, cries, laughter. With this idea in mind I adapted the film for London and with a team of technicians and friends the project was materialized. It is important to reconnect, deepen relationships, build collective bridges to our connection with the world and also manage our necessary current isolation in a creative, active and responsible way. And if it is through art, even better. I share here the link to our film for those who want to see or revisit. Take a few minutes and enjoy it!” Amanda Gracioli @amandagracioli #cinemabrasileiro #cinemanacional #sujeitoculto #amandagracioli #bahia #brasilinglaterra #thehiddensubject #solidão #solitute #loniless #londonsalvador #london #carlarebouças #tiagodimauro #kyaraorlando #valneinunes #shortfilm #courtmetrage #confinamento #quarantine #lellipsedusujet #quarentena #curtametragem #lockdown |
| CHlr3M-jV96 | 2 | 0.3002707 | Você tem vontade de mudar isso? . . . . . . . #quarentena #tendotempo #personalorganizer #organização #estilodevida #tempo #tempoévida #organize #personalorganizersantacatarina #profissionalemorganização #personalorganizerfloripa #personalorganizerflorianópolis #floripa #desapego #personalorganizerbc #euorganizo #organizesuavida #homeorganizer #solucoesemorganizacao #personalorganizerjoinville #personalorganizerblumenau #organizacaoprofissional #amoorganizar #organizacaobaby #organizacaocloset #organizacaofuncional #organizadores #organizacaopratica ##organizaçãotransforma |
| CHoBCfUjaGV | 2 | 0.2861838 | Fica a dica 👊 |
| CHlktpqpLVX | 4 | 0.2500850 |
⠀⠀⠀⠀⠀⠀⠀⠀⠀ Atleta @anthony_gabriel_sw Cada esforço a mais faz diferença no seu resultado final! Sempre de forma consciente. 🚛Frete 50% de desconto para todo o Brasil 🇧🇷 Entre em contato 📲 11 99474-4061 #loja #parallettesbr #parallelbars #parallettes #paralletes #paraletes #paralettes #paralelas #wood #madeiranit #paradademao #calisthenics #calistenia #calisteniabrasil #esporte #pbars #handstand #pullup #barbrothers #quarentena #training #crossfit #fitness #crossfitbrasil #yogabrasil #sp #fitnessbrasil #streetworkout #treinofuncional #treinoemcasamesmo |
| CHoekqTsJWt | 4 | 0.2500821 | Nada melhor que dizer Eu te Amo com comida!!!🤤 #Ateliermeudoce #Bolo #FestanaCaixa #CafédaManhã #NaCaixa #decoração #Personalizada #Chocolate #Brigadeiro #Exclusivo #aniversário #love #surpresa #Mesversário #quarentena #Macaé #eucurtoMacaé #MacaéTips |
| CHnDoHxnEY3 | 4 | 0.2500818 | 📍Porto, Portugal 🇵🇹 . Este fim de semana estamos em recolher obrigatório e as ruas ficam vazias. Esplanadas e praças de comércio ficam fechadas… são medidas drásticas mas se queremos que tudo passe porque não fazemos nós uma autocrítica sobre como nos temos comportado… Para mim desde que começou a pandemia acabaram os jantares de grupo, as idas ao café e evito estar com muita gente. Mas por alguma razão há sempre alguém que se está a borrifar para as regras… e é essa pessoa que nos faz ficar confinados em casa. É esse que não respeita a tua saúde e a tua liberdade. Vale a pena pensar nisso. Bom domingo! . . #porto #portugal #quarentena #liberdade #travel #viagens #viajar #amar_portugal #amar_porto #portugaldenorteasul #portugal_lovers #nortedeportugal #lugaresdeportugal #wowportugal #sunlight #emptystreets #photographylovers #canonportugal |
| CHlbho-nhn0 | 4 | 0.2500810 | •VESTIDO RENDA DE ALGODÃO •FORRADO •MARCA AQUARELLA •TAM P •R$ 40,00 com desconto 25% 30,00 •ESTADO 10/10 • • • • • • • • • • • • • • • • • • • • • #calças #camisavintage #modavintagemujer #vintage #calcacgc #retro #goiania #moda #estilo #tendencia #bazar #brechó #brecho #brechoonline #brechovirtual #quarentena #seminovos #modafeminina #modacomportada #modacomproposito #modaestilo #mulheres #mulherelegantetododia #mulheresempreendedoras #brechoonline #brechogoiania #brechozinho #brechovintage #brecholovers #brechogyn |
| CHl1XQVBgA5 | 4 | 0.2500803 |
Novo normal 😷 #saopaulo #sp #sampa #saopaulocity #amoremsp #lovesp #farolsantander #fotosp #diegodosss #quarentena #novonormal #revoada #exposp #exposicaosp |
| CHnXiXmn52X | 4 | 0.2500783 |
É um modelo mais bonito que o outro! . Seja único, seja você. . Curtiu? Chama lá Direct ou Whatsapp (85) 98622-9036 Link na Bio . Entrega Grátis para toda Fortaleza (compras a partir de R$50,00) . Enviamos para todo Brasil 🌎 . Locais de venda ✔ @grandbarbeiro @pjclubbarber @domfalcaobarber @mestrebarbeiro_ @sullivanbarbershop @chaplinsbarbearia @salvatore_fortaleza @forest_barbershop @redmonkeybarbearia @portellasbarbearia . Seja um revendedor THE RUA 🏷 |
| CHnl_E4Hjnt | 4 | 0.2500776 |
Que Nossa Senhora proteja nosso Brasil e dê a sabedoria necessária hoje a todos os eleitores! “Salve Rainha Mãe de misericórdia, vida, doçura e esperança nossa, salve! A vós bradamos os degradados filhos de Eva. A vós suspiramos, gemendo e chorando neste vale de lágrimas. Eia pois advogada nossa, esses vossos olhos misericordiosos a nós volvei. E depois deste desterro, mostrai-nos Jesus, bendito fruto de vosso ventre. Ó clemente ! ó piedosa ! ó doce sempre Virgem Maria! V. Rogai por nós Santa Mãe de Deus. R. Para que sejamos dignos das promessas de Cristo. Amém. . . Aproveite para pedir as suas pulseiras de orações! 😉 Nossos produtos são exclusivos e nosso estoque é limitado. No link da bio você é direcionado automaticamente para o nosso WhatsApp!😉 📲 11 99984-9670 Entregamos para todo o Brasil 📬 . #pulseirasdeorações #mantra #quarentena #amor #universo #nossasenhora #avemaria #painosso #painossoemingles #presentesespeciais #fashion #chic #elegante #estilo #presente #tendencia #fe #desejo #lancamento #elasusam #pulseiras #oração #pulseirasfemininas #pulseirasdecouro #homespray #bento #pocketspray #novidade |
Observa-se que os textos típicos do tópico 3 tem alta probabilidade de pertencenter ao tópico, fato que não acontece para o dois e quatro.