Para poder obtener el CSV de cada uno de los candidatos donde se muestran las publicaciones de facebook que cada candidato hace, así como el número de likes o reacciones, número de comentarios, número de veces compartidas por cada publicación y la fecha en que se publican, se hizo uso de una página de Scraping a la cual se accede con la siguiente URL https://apify.com/. Una vez que se está dentro de la página se inicia sesión, colocamos los datos que se indican para autentificar el inicio de sesión y elegir las preferencias al momento de usar la página, una vez iniciada sesión nos pide indicar el tipo de búsqueda que se va a hacer, en este caso seleccionamos Facebook Post Scraper, una vez que se selecciona esta opción se accede a la página principal para poder descargar el CSV de los datos del candidato, para esto, se debe de colocar el link del perfil a buscar esto en el apartado de Facebook URLs, y en el apartado de Result Amount elegimos la cantidad de registros que deseamos obtener en este caso clocamos 100 registros, posteriormente pulsamos el botón de Start con esto se inicia a obtener el csv de las publicaciones y los datos de cada uno. Una vez que se obtienen los 100 registros aparece un boton de Export resultados, una vez ahí se selecciona el tipo de archivo que se desea descargar y las columnas que se desean extraer(Selected fields), en este caso el text, like, comments, shares y time y se pulsa el botón de Download, con esto se nos descarga el CSV de las publicaciones y los datos correspondientes de cada una.
En este apartado se importan las librerías que se van a utilizar inicialmente, en este caso readr.
library(readr)
## Warning: package 'readr' was built under R version 4.3.3
library(lubridate)
## Warning: package 'lubridate' was built under R version 4.3.3
##
## Attaching package: 'lubridate'
## The following objects are masked from 'package:base':
##
## date, intersect, setdiff, union
convertir_hora <- function(data) {
data %>%
mutate(hora = format(as.POSIXct(time, format="%Y-%m-%dT%H:%M:%OSZ", tz="UTC"), "%H:%M"))
}
En este apartado se manda llamar y se visualiza el dataset con el cual se va a trabajar, en este caso es el dataset de Maynez.csv.
Datosmaynez <- read.csv("C:/R/Maynez.csv")
View(Datosmaynez)
Datosmaynez
## text
## 1 Recibí a la Misión Electoral de la Organización de los Estados Americanos (OEA) que viene a México 🇲🇽 a observar la elección de este domingo.\n\nLes compartí mi visión sobre el proceso electoral y establecimos un diálogo que habrá de ser permanente durante los próximos días.\n\nMe dio gusto saludar a Heraldo Muñoz, jefe de la misión.
## 2 ¡Gracias!\n\n¡El domingo gana México 🇲🇽!
## 3 Hoy quiero darle las gracias a México 🇲🇽. Y quiero hacerlo de la manera en la que yo más he disfrutado la vida: con música 🎵 y Rock 🎸.\n\nUstedes cambiaron la elección. De ustedes es el #MéxicoNuevo 🇲🇽
## 4 Cerramos campaña en el estado de Puebla ante miles de ciudadanas y ciudadanos libres que nos recibieron con alegría y la convicción de que el domingo haremos historia.\n\n¡Seré #ElNuevoPresidente si el domingo sales a votar pensando en lo mejor para tus hijos!\n\n¡Gracias, San Martín Texmelucan!
## 5 ¡Gracias, México 🇲🇽! \n\nSomos el mejor país del mundo y tendremos la mejor etapa de nuestra historia. \n\nFue una campaña inolvidable e histórica. Demostramos que se puede derrotar al poder del dinero y de la corrupción, con nuevas ideas, jugando limpio y respetando la ley.\n\n#VotaMáynez 🫶🏽
## 6 Una candidata te dice que votes contra Morena y la otra te dice que votes contra el PRIAN.\n\nTe invito a votar por el futuro de tus hijos y de nuestro país. A votar por la mejor opción. A votar por un #MéxicoNuevo 🇲🇽.\n\n#VotaMáynez 🤟🏾
## 7 Porque la educación es un derecho. \n\nY porque ningún joven debería ser rechazado de la universidad.\n\nVota por el futuro. Vota #MáynezPresidente 🤟🏾
## 8 Este domingo se define todo ⚽️. Hemos logrado llegar a la final contra todos los pronósticos y estamos a un paso de que gane México 🇲🇽.\n\n#VotaMáynezPresidente 🤟🏾
## 9 RC TFK y Azuky completan el line up de hoy para el #MaynezCapitalFest. 🎤\n\nEl maestro y la mejor freestylera de México 🇲🇽. Nos vemos en el BlackBerry; recuerda que el acceso es con boleto y no habrá en taquilla. \n\n#VotaMáynezPresidente 🎸
## 10 México merece un presidente con propuestas y que esté a la altura de la grandeza de nuestro país. \n\nMéxico merece dejar atrás el odio y el rencor, para construir una etapa de paz, esperanza y alegría.\n\nEl mejor México 🇲🇽 de la historia comienza este domingo. Elige sonreír, #VotaMáynez 😁
## 11 La esperanza, el amor y la alegría van a derrotar este domingo al odio y al rencor.\n\nLa paz derrotará a la guerra y el futuro al pasado. #VotaMáynezPresidente 🫶🏽
## 12 Para quienes me han preguntado cómo votar por #ElNuevoPresidente 🇲🇽 este domingo:\n\n#CruzaElÁguila 🦅
## 13 Vota por tener el primer presidente de la historia que vea a las niñas y a los niños como lo que son: las personas más importantes de una nación 🇲🇽.\n\nVota por duplicar el presupuesto para atender a las infancias. #VotaMáynezPresidente 🫶🏽
## 14 Siéntete orgulloso por todo lo que hemos logrado. \n\nEl domingo ponte feliz y vota con todas tus fuerzas por el #MéxicoNuevo 🇲🇽.\n\n#VotaMáynez 🫶🏽
## 15 Les tenemos una sorpresa para el cierre de esta noche. Se agregan más artistas al Line Up 🕺🏻.
## 16 El lunes 3 de junio tenemos dos posibilidades: celebrar el #MéxicoNuevo 🇲🇽 o lamentarnos por tener que esperar otros 6 años para hacerlo posible.\n\nElige sonreír, #VotaMáynezPresidente 🤟🏾
## 17 ¡Este domingo, vota!\n\nY el próximo sexenio llevaremos a un millón de jóvenes a la universidad 🇲🇽\n\n#VotaMáynez 🤟🏾
## 18 ¿Cómo votar este domingo? \n\n¡Acá lo explica Mariana Rodríguez!\n\n#VotaTodoNaranja 🧡
## 19 Le preguntaron a las personas: si cambiara su voto, ¿Por quién lo haría?\n\nY esto respondieron. Ayúdanos a terminar de convencer a tu familia y amigos.
## 20 México: viene una sorpresa. Confía en ti, #VotaMáynez 🤟🏾
## 21 Hoy cerramos nuestra campaña en Jalisco, al lado de Pablo Lemus Navarro y Fany Padilla, en El Salto junto a miles de hombres y mujeres libres.\n\nJalisco va a tener a un presidente aliado para llevar a este gran estado al siguiente nivel.\n\n#ElNuevoPresidente 🇲🇽
## 22 Estamos a 5 días de tener una jornada laboral digna para que puedas pasar más tiempo con tu familia.\n\nY para llevar a 1 millón de jóvenes a la universidad por primera vez en la historia. Confía en ti, vota por lo que crees. #VotaMáynezPresidente 🫶🏽
## 23 Nos dicen que somos una canción… 🎶 \n\n¡Yo digo que le subamos al volumen 🔊! ¿Ya escuchaste la nueva versión de #PresidenteMáynez?\n\nCompártela con tus amigos y con tu familia. ¡Que #LoNuevo suene en todos lados!
## 24 En los debates demostramos que somos la voz de millones de personas que luchan por la justicia.\n\nDemostramos que se puede responder a la gente con propuestas y hacer a un lado las ofensas y los agravios.\n\nVota por el #MéxicoNuevo 🇲🇽, vota #MáynezPresidente 🤟🏾
## 25 Estuvimos en la Universidad Autónoma de Chihuahua con estudiantes que se organizaron para recibirnos a pesar del intento de boicot de la gobernadora.\n\nFue tal su desesperación que mandaron quitar el mobiliario del auditorio y no dejaron ni una silla para sentarme.\n\nPero nada impidió el diálogo franco y esperanzador en la universidad #48 del país que visitamos en esta campaña.\n\nEl domingo haremos historia. #VotaMáynezPresidente 🇲🇽
## 26 Así se vota por #LoNuevo este 2 de junio. 🍊\n\nVota por lo que crees, #VotaMáynezPresidente.
## 27 Universidad número 47: Universidad La Salle Chihuahua. Las y los jóvenes son la prioridad y el alma de nuestra campaña y lo serán el próximo sexenio.\n\nSeré el presidente de las nuevas generaciones y de sus causas. #VotaMáynezPresidente 🇲🇽
## 28 Ser el presidente de las y los jóvenes significa luchar por tu derecho a la educación, a una vivienda digna y a un empleo bien pagado y con dos días de descanso a la semana. 🤟🏾\n\nSer #ElNuevoPresidente significa poner en el centro al medio ambiente, la salud mental y que gobernemos juntos.\n\nGracias a las y los jóvenes de Jalisco por sus ideas, sus preguntas y todo su apoyo. Este 2 de junio, lo haremos posible. #VotaMáynezPresidente 🫶🏽
## 29 No hay mejor inversión que la educación. Por eso vamos a invertir en nuestras universidades como nunca antes y llevar a un millón de jóvenes a la universidad.\n\nTuvimos un gran encuentro con la Confederación Nacional de Trabajadores Universitarios, CONTU, que agrupa a miles de académicos y trabajadores en todo el país. \n\nVota por la educación, #VotaMáynez 👨🏻🏫
## 30 Vamos a hacer de México el mejor país para que tus hijos nazcan, crezcan y sean felices. \n\nEste 2 junio vota por el presidente de las niñas y los niños, vota Movimiento Ciudadano.\n\n#VotaMáynez 😁\n#ElNuevoPresidente 🇲🇽
## 31 En nuestro gobierno, la vivienda 🏡 será un derecho y no un negocio.\n\nCrearemos un fondo nacional para reserva territorial destinada a la vivienda social.\n\nRescataremos casas y edificios abandonados.\n\nTendremos alquiler social para estudiantes, madres solteras y recién egresados.\n\nY habrá crédito para quien no tenga Infonavit y quiera comprar una casa. \n\nVota por el derecho a la vivienda. #VotaMáynezPresidente 🤟🏾
## 32 Nuevos días, México 🇲🇽.¡Elige ser feliz, confía en ti!Vota #PresidenteMáynez 😁#VotaMáynezPresidente 🤟🏾
## 33 Aquí les dejo el Line Up del festival 🎸 para agradecerle a las y los jóvenes haber cambiado el rumbo de la elección 🙏🏽.\n \nLa entrada será gratuita, pero con boleto 🎫.\n \nLos puedes recoger en Río Becerra #27 y Mier y Pesado #26 de 11:00 a.m. a 7:30 p.m. o contactarnos por redes sociales. \n \nTambién el día del evento en el Auditorio BlackBerry. #MaynezCapitalFest 👨🏽🎤
## 34 Espero les guste la nueva versión de #PresidenteMáynez.\n\nCon el #MéxicoNuevo, vamos a tumbar a la vieja política.\n\n#VotaMáynezPresidente 🤟🏾
## 35 Además de duplicar las becas, vamos a entregar un bono cultural a estudiantes de preparatoria y universidad para ir al teatro 🎭 y a conciertos 🎶; comprar música 🎧 y libros 📚. \n \nPor tu derecho a la felicidad, por el derecho a la cultura y para detonar las industrias creativas que generaron buenos empleos y prosperidad. \n \nVota por el #MéxicoNuevo 🇲🇽
## 36 El voto útil explicado de la manera más sencilla posible. Compártelo con tus amigos y familiares. Este 2 de junio, #VotaMáynez 😁
## 37 🚨 Atención 🚨 VIENE UNA SORPRESA a las 9:30 p.m.\n\nMe encontré Moy Barba y Yuawi López en el aeropuerto de Chetumal. Moy creó “Presidente Máynez” y Yuawi la canta. \n\nY esta noche habrá una sorpresa.
## 38 Tenemos un mensaje para ti: este 2 de junio vota pensando en el futuro. \n\nQueremos pacificar a México y que todas las personas tengan todos los derechos y las mismas oportunidades. \n\nVota por el #MéxicoNuevo 🇲🇽
## 39 Estuvimos en Chetumal, en la universidad número 46 que visitamos en esta campaña: la UNID Campus Chetumal.\n\nDialogamos de frente con jóvenes, sobre cómo poner en el centro a la naturaleza en un nuevo modelo de prosperidad para Quintana Roo y todo México 🇲🇽.\n\n#VotaMáynezPresidente 🤟🏾
## 40 Este 2 de junio, ayúdanos. Tú tienes el poder.\n\n¡Elige sonreír, #VotaMáynezPresidente 😁!
## 41 Importa que ya estamos en segundo pero también importa la tendencia. Hemos triplicado nuestra intención de voto.\n\nEl voto útil es votar por lo que crees. Votar por Movimiento Ciudadano. ¡Hagamos posible lo que parecía imposible!\n\n#VotaMáynezPresidente 🇲🇽
## 42 En los debates quedó demostrado que hay una mejor opción: con nuevas ideas y propuestas concretas para pacificar México 🇲🇽, generar prosperidad e igualar las oportunidades.\n\nCon tu voto, un mejor México es posible.\n\n#VotaMáynezPresidente 🤟🏾
## 43 Jalisco: construyamos juntos la mejor época de la historia para Jalisco y para México 🇲🇽.\n\nVota por lo que crees, vota todo naranja 🧡.
## 44
## 45 Vota por lo que más quieras. Vota con tu familia. Vota por los que amas.\n\nEl domingo, vota feliz. #VotaMáynezPresidente 😁
## 46 ¡Buenos días!
## 47 ¿Eres de las millones de personas que creen que somos la mejor opción pero no podemos ganar? \n\nMira lo que sucedió hoy en Campeche. Confía en ti, vota por lo que crees. Haremos posible el mejor México 🇲🇽 de la historia.\n\n#VotaMáynezPresidente 🤟🏾
## 48 Nunca olvidaré que esta campaña la cambiaron las y los jóvenes. Cuando la vieja política nos decía que era imposible, ellos lo hicieron posible.\n\nPara agradecerle a las y los jóvenes, cerraremos campaña con un festival en su honor y para darles las gracias 🙏🏽. \n\nLa entrada será gratuita, pero con boleto.\n\nLos puedes recoger en Río Becerra #27 y Mier y Pesado #26 de 11:00 a.m. a 7:30 p.m. o contactarnos por redes sociales. \n\nTambién el día del evento en el Auditorio BlackBerry.
## 49 ¡Gracias Campeche! Ni Layda y Alito juntos van a poder frenar el cambio total.\n¡El 2 de junio, inicia el mejor México 🇲🇽 de la historia!
## 50 Se demostró en los debates: las mejores ideas y el mejor plan para el futuro de México 🇲🇽 son parte de #LoNuevo.\n\nRecuerda que esta elección la van a definir ustedes. ¡Pero hay que hacerlo y no nada más decirlo! #VotaMáynezPresidente 😁
## 51 Sé que hubo grupos de interés y grupos de poder que hicieron todo porque no estuviéramos en la boleta.\n\nAlgunos de ellos, incluso, han llegado a desear que no me hubiera salvado del trágico accidente del pasado miércoles.\n\nPero frente al odio y al rencor de unos cuantos, la voluntad y el cariño de millones nos ha impulsado a seguir y a demostrar que hay otra manera de hacer las cosas: una que respeta las reglas y los límites de la decencia. \n\nSomos millones. Y vamos a cerrar como empezamos: con esperanza en un mejor futuro para México y con la alegría porque lo vamos a lograr sin traicionar nuestra esencia.\n\n#MéxicoNuevo 🇲🇽
## 52 Uno de los momentos que mi familia nunca va a olvidar de esta campaña es cuando estuvimos en el Barrio de Tepito.\n\nLuciano nunca había visto tantas playeras de futbol para niños, incluyendo su favorita: la del gran Jorge Campos. ¡Gracias por su cariño! 🫶🏽
## 53 La grandeza de Jalisco es la grandeza de México.\n\nPor eso hemos recorrido Jalisco para invitar a la gente a votar por el mejor México de la historia: un pais en paz, con justicia, prosperidad e igualdad de oportunidades.\n\nJalisco: #VotaMáynezPresidente vota por el #MéxicoNuevo 🇲🇽.
## 54 Desde Ciudad del Carmen, le advertimos a la gobernadora de Campeche y a la vieja política que esta vez no podrán detener a nuestro movimiento.\n\nAunque hicieron de todo para impedir que estuviera en la boleta, Eliseo Fernández Montufar será senador y encabezará un cambio total para la Isla y para todo Campeche.\n\n#VotoTotal 🍊
## 55 Conozco y entiendo los problemas de La Laguna. No solo porque he visitado la región desde niño por razones familiares, sino porque he sido testigo del abandono.\n\nEstuve en Gómez Palacio y Torreón para convocar a la gente de La Laguna a una nueva etapa de prosperidad y oportunidades.\n\n#VotaMáynez 🇲🇽
## 56 Vota por un #MéxicoNuevo 🇲🇽, en el que el salario permita que todas las personas vivan con dignidad. \n\n#VotaMáynezPresidente 🤟🏾
## 57 Hoy le hicieron trampa a nuestro paisano, pero esto no se acaba hasta que se acaba. Actuar mal nunca termina bien. \n\nAl igual que en la F1 , los naranjas seguimos creciendo. El próximo domingo, va a ganar México 🇲🇽. \n\n#VotaMáynezPresidente 🏁
## 58 Buenos días, México 🫶🏽.
## 59 Hace algunas semanas, NMás me acompañó a un día de campaña. Aqui les comparto el reportaje de Fernanda Caso Prado:
## 60 En Colima, el PRI y el gobierno del estado han hecho de todo para impedir que Margarita Moreno esté en la boleta.\n\nHoy estuvimos acompañándola a ella y a todos nuestros candidatos para demostrarle a la vieja política que nuestro movimiento está de pie. \n\n¡Gracias por todo su respaldo y cariño 🫶🏽!
## 61 Griselda Martínez Martínez y Martha Zepeda del Toro son mucha pieza y han enfrentado muchas adversidades, al igual que Margarita Moreno:\n\nAmenazas, intimidaciones y persecución por parte del gobierno morenista de Colima. Por eso no podía dejar de acompañarlas hoy en Manzanillo. No están ni estarán solas.\n\n#LoNuevoEsConEllas 🤟🏾
## 62 Hay temas de los que las otras candidaturas prácticamente no han hablado. Uno de ellos es la cultura. Aquí una de nuestras propuestas para hacerla florecer y que verdaderamente sea un derecho:
## 63 Balero, Margarita Moreno y yo los invitamos al Jardín Libertad. Hoy a las 7:00 p.m. por un Colima próspero, en paz y con igualdad de oportunidades.
## 64 Reanudamos campaña. Y lo hacemos con un mensaje muy claro:
## 65 Paz, amor y esperanza frente al odio, la guerra y el rencor.\n\nA pesar de que desde la campaña del PRI y el PAN se ha ordenado intensificar la guerra sucia en mi contra, que encabeza el propio Felipe Calderón, ex presidente de la República, hoy les respondo:\n\nNo somos iguales. Yo jamás podría desearle la muerte a un adversario político, como hicieron ustedes el pasado miércoles.\n\nAhí donde ustedes han sembrado odio y rencor, nosotros seguiremos sembrando esperanza.\n\nAhí donde ustedes declararon la guerra, nosotros vamos a declarar la paz. \n\nEn política se pueden ganar y perder elecciones, pero hay límites que nunca se deben cruzar. Sus millones, sus bots y su guerra sucia no les van a alcanzar para detenernos.\n\nPorque somos mucho más que un candidato. Somos una convicción. El #MéxicoNuevo será posible y será mejor para todas las personas. Incluidos ustedes y sus familias.\n\nComo lo dije en el debate: mi meta es mucho más grande que ser presidente. Mi meta es hacer posible el mejor México de la historia 🇲🇽.
## 66 Coincido con Mariana. Confío en la sensibilidad de mis compañeras y compañeros de Nuevo León.
## 67 Cuando las y los jóvenes lo deciden, el futuro cambia. La vieja política le apuesta a que no voten y no participen. \n\nNosotros tenemos puesta toda nuestra esperanza en las nuevas generaciones.
## 68 Ayer me preguntaron qué me podía hacer sentir mejor. Aquí la respuesta.
## 69 Con esta gente, nunca. A ningún lado. Por ningún motivo.\n\nHan hecho la campaña más ruin que recuerde desde 2006, mostrando su verdadero rostro. Deseando incluso mi muerte.\n\nNo les importa el dolor ajeno. Los han consumido el odio y el rencor.\n\nQue les aproveche su guerra sucia.
## 70 Hace unas semanas tuve una entrevista con La Chávez. Fue una conversación muy amena y auténtica.\n\nAquí mi respuesta a su pregunta de qué pasaría si llegara a ser presidente.\n\n#MáynezPresidente 🇲🇽
## 71 Tenemos varias semanas denunciando la guerra sucia del PRI y el PAN. \n\nLa organizan en WhatsApp y en ella juegan un papel muy relevante algunos de los supuestos “intelectuales” que hace unos días firmaron un desplegado contra el “autoritarismo”. \n\nEstos mensajes fueron enviados mientras estábamos en medio de la tragedia y decenas de personas se jugaban la vida. Los pintan de cuerpo entero.
## 72 En la Escuela de Periodismo Carlos Septién García. Oficial me preguntaron mi opinión sobre las burlas y el oportunismo de ciertos personajes de la clase política.\n\nAquí mi respuesta:
## 73 El día de hoy sostuvimos un encuentro privado con estudiantes y docentes de la legendaria Escuela de Periodismo Carlos Septién García. Oficial.\n\nEsta charla se había programado desde hace meses, y se da también con motivo de su 75 aniversario. Es la universidad número 45 que visitamos desde el inicio de la campaña.
## 74 Estar con ellos.
## 75 Me encuentro ya en la Ciudad de México.\n\nLes informo que en unas horas será dada de alta nuestra compañera Laura Ballesteros Mancilla, coordinadora general de la campaña, quien permanecerá en Monterrey para seguir al pendiente de forma personal de las personas lesionadas y de las víctimas.
## 76 El día de hoy tenía previsto acompañar a mi amiga Citlalli Amaya en su cierre de campaña en Tlaquepaque, Jalisco.\n\nCitlalli ha sido una gran presidenta municipal y tiene todo mi respaldo. Le deseo todo el éxito en el evento y le envío un abrazo muy cariñoso a toda la gente que estará ahí reunida.
## 77 Estoy saliendo de la última reunión del día con el gobernador Samuel García.\n\nTodas las personas lesionadas se reportan estables. Una docena hospitalizada y solo un par en cuidados intensivos.\n\nLa constante comunicación entre autoridades estatales y federales ha sido clave.
## 78 En memoria de Elvira, Antonia, María Elisa, José de Jesús, Laura, Martha Alicia, Juana María, Alejandro y Olga.
## 79 En medio de la situación más dolorosa que he enfrentado en mi vida, me ha tocado ser testigo del heroísmo de paramédicas y paramédicos, la atención sensible de enfermeras, enfermeros, doctoras y doctores.\n\nY también de la capacidad que tienen las personas para enfrentar una tragedia de esta magnitud. Seguiremos pendientes de la evolución de cada persona lesionada y sus familias.
## 80 Mensaje desde el Hospital de Traumatología y Ortopedia No. 21
## 81 En seguimiento a los acontecimientos de ayer en Nuevo León:
## 82 Última actualización desde Nuevo León 👇🏼
## 83 Sobre los sucedido esta noche en San Pedro, NL:
## 84 Le he informado a mi equipo que mi visita a Tlaxcala e Hidalgo el día de mañana queda suspendida, así como todas las actividades de campaña. \n\nTambién he suspendido mi vuelo de regreso. Estaré en Nuevo León al pendiente de la situación y de las víctimas.
## 85 Tras el accidente en San Pedro Garza, donde una ráfaga de viento derrumbó el escenario en el que nos encontrábamos, me trasladé al hospital San José.\n\nEstoy bien y en comunicación con autoridades estatales para dar seguimiento a lo acontecido. Lo único importante en estos momentos es atender a las víctimas del accidente.
## 86 Al escribir mi libro #MéxicoNuevo 🇲🇽, le pedí a Luciano decirme cómo era el México en el que le gustaría vivir. Leí lo que nos dijo a su mamá y a mí en el segundo debate. Aquí puedes escucharlo. #EsPosible 🤟🏾
## 87 ¿Qué creen? Somos, oficialmente, la campaña más viral de la historia de México 🇲🇽.\n\n¡Mil millones de reproducciones en plataformas digitales! ¡Gracias por haber cambiado la elección! Este 2 de junio, #VotaMáynez 🤟🏾
## 88 México tendrá un gobierno humano y al servicio de las personas.\n\nDesde Veracruz, seguimos recorriendo el país para convocar a construir una nueva etapa para la República: con justicia, paz, prosperidad e igualdad de oportunidades.\n\nVota por el #MéxicoNuevo 🇲🇽
## 89 Haremos de Tijuana la capital mexicana de la prosperidad.\n\nCon una frontera inteligente, segura y ágil y una inversión histórica en transporte público eléctrico, vivienda, salud, educación y cultura, todo estará mejor.\n\nGracias a las y los jóvenes del CETYS Universidad Campus Tijuana por un recibimiento espectacular 🤟🏾.
## 90 Sigo recorriendo las universidades de México 🇲🇽, demostrando que es posible ganarle al dinero y a la corrupción.\n\nGanar con ideas, ganar con propuestas y hacer posible un mejor país para las próximas generaciones. #VotaVotaMáynez 🤟🏾
## 91 Nuestro movimiento sigue creciendo en todo México. Plazas llenas y más fuerza que nunca son el mejor síntoma de que este 2 de junio tendremos un resultado histórico.\n\nElige ser feliz, elige sonreír. #VotaMáynez 🇲🇽
## 92 Hay muchas maneras de ser, de bailar y de disfrutar la vida.\n\nSea cual sea tu estilo y sea cual sea tu ritmo, elige ser feliz, elige sonreír.\n\n#VotaVotaMáynez 🫶🏽
## 93 ¿Ya sabes cómo votar?\n\nAcá te contamos cómo.\n\nEste 2 de junio vota feliz, vota #MáynezPresidente😁
## 94 ¡Buenos días y muchas felicidades!\n\nEl 2 de junio será tu día de suerte 🍀
## 95 Mi meta es mucho más grande que ser presidente 🇲🇽.
## 96 La cultura es un derecho y también lo es la libertad para que las y los jóvenes puedan vivir felices y en plenitud.\n\n¡Seré el presidente de las jóvenes y los jóvenes de México 🇲🇽!\n\nElige vivir feliz #VotaMáynezPresidente 🎸.
## 97 Por mis venas corre sangre lagunera y por eso entiendo que es una región que merece salir del olvido y vivir una etapa de prosperidad.\n\nHoy estuve en Torreón, Coahuila por la mañana y en Gómez Palacio, Durango por la tarde. ¡Gracias a la gente por su cariño y apoyo!
## 98 Elige ser feliz, elige sonreír. 🕺🏻 \n\nCon alegría, porque viene la mejor época en la historia de México #VotaVotaMáynez 💃🏻.
## 99 Mientras la vieja política llena las ciudades de basura, aquí se promueve la cultura.\n\nVean el mural que Jazor VRS y Tereza hicieron en León, Guanajuato: “El México Nuevo cuida el agua”.\n\n¡Vamos por una nueva cultura del agua!
## 100 Te comparto una reflexión desde la Ibero Torreón. ¿Qué está en juego en esta elección? \n\nPara mí, lo que está en juego va mucho más allá de votar contra unos o votar contra otros. Podemos votar por un mejor país 🇲🇽.\n\n#ElNuevoPresidente 😁
## likes comments shares time
## 1 882 113 19 2024-05-30T19:51:39.000Z
## 2 4754 439 242 2024-05-30T05:58:11.000Z
## 3 5418 467 198 2024-05-30T05:05:06.000Z
## 4 1706 197 102 2024-05-30T04:10:42.000Z
## 5 2746 266 213 2024-05-30T03:05:48.000Z
## 6 1322 134 123 2024-05-30T02:20:31.000Z
## 7 1414 190 67 2024-05-30T01:20:06.000Z
## 8 1427 193 141 2024-05-30T00:10:41.000Z
## 9 1239 255 38 2024-05-29T23:25:07.000Z
## 10 1317 181 177 2024-05-29T22:15:43.000Z
## 11 1710 328 62 2024-05-29T21:05:13.000Z
## 12 918 115 116 2024-05-29T19:55:34.000Z
## 13 1808 297 157 2024-05-29T18:50:19.000Z
## 14 2108 243 276 2024-05-29T17:35:53.000Z
## 15 5319 788 251 2024-05-29T16:55:07.000Z
## 16 1401 214 181 2024-05-29T15:41:08.000Z
## 17 2757 334 208 2024-05-29T14:25:18.000Z
## 18 1043 149 102 2024-05-29T13:00:51.000Z
## 19 2381 418 131 2024-05-29T12:32:33.000Z
## 20 1899 211 85 2024-05-29T05:55:25.000Z
## 21 3157 268 202 2024-05-29T04:50:13.000Z
## 22 1406 153 144 2024-05-29T03:33:51.000Z
## 23 1387 204 57 2024-05-29T02:10:43.000Z
## 24 1291 165 90 2024-05-29T00:46:06.000Z
## 25 1504 228 67 2024-05-28T23:20:11.000Z
## 26 1697 196 253 2024-05-28T21:49:50.000Z
## 27 1163 185 38 2024-05-28T20:30:05.000Z
## 28 2656 372 180 2024-05-28T19:06:13.000Z
## 29 1086 159 36 2024-05-28T17:46:19.000Z
## 30 6927 527 1630 2024-05-28T16:21:05.000Z
## 31 1622 266 129 2024-05-28T14:55:23.000Z
## 32 58529 2247 3877 2024-05-28T13:34:03.000Z
## 33 2385 400 181 2024-05-28T04:56:03.000Z
## 34 34366 2299 2601 2024-05-28T03:30:43.000Z
## 35 1931 165 119 2024-05-28T02:05:11.000Z
## 36 1923 207 266 2024-05-28T00:39:27.000Z
## 37 4064 323 102 2024-05-27T23:15:15.000Z
## 38 18222 1625 2612 2024-05-27T22:00:23.000Z
## 39 1389 137 90 2024-05-27T20:25:17.000Z
## 40 15530 2538 1680 2024-05-27T19:00:32.000Z
## 41 8424 1685 471 2024-05-27T17:35:35.000Z
## 42 1504 180 211 2024-05-27T16:11:28.000Z
## 43 2729 302 80 2024-05-27T14:45:57.000Z
## 44 1821 180 120 2024-05-27T14:19:12.000Z
## 45 1152 150 446 2024-05-27T13:22:25.000Z
## 46 3110 567 165 2024-05-27T11:30:23.000Z
## 47 4431 468 717 2024-05-27T05:20:57.000Z
## 48 4545 727 452 2024-05-27T03:50:20.000Z
## 49 18605 867 1309 2024-05-27T02:42:51.000Z
## 50 1572 192 170 2024-05-27T01:35:15.000Z
## 51 1960 268 187 2024-05-27T00:10:02.000Z
## 52 3028 304 53 2024-05-26T22:45:00.000Z
## 53 7612 1240 958 2024-05-26T21:20:55.000Z
## 54 2322 246 149 2024-05-26T19:59:51.000Z
## 55 1650 170 251 2024-05-26T18:32:13.000Z
## 56 5313 579 256 2024-05-26T17:05:19.000Z
## 57 1617 198 151 2024-05-26T15:38:51.000Z
## 58 13640 990 284 2024-05-26T13:49:18.000Z
## 59 1137 141 18 2024-05-26T05:27:31.000Z
## 60 2250 159 52 2024-05-26T04:36:36.000Z
## 61 1352 114 52 2024-05-26T03:07:17.000Z
## 62 1507 98 98 2024-05-26T01:35:51.000Z
## 63 1848 99 35 2024-05-26T00:10:05.000Z
## 64 3050 282 681 2024-05-25T22:43:33.000Z
## 65 16109 1443 700 2024-05-25T20:30:25.000Z
## 66 1294 109 53 2024-05-25T19:49:03.000Z
## 67 1906 130 464 2024-05-25T18:04:18.000Z
## 68 23112 1088 272 2024-05-25T16:46:33.000Z
## 69 3450 530 311 2024-05-25T15:06:29.000Z
## 70 1934 143 376 2024-05-25T13:36:51.000Z
## 71 1110 177 74 2024-05-25T05:00:52.000Z
## 72 2200 162 238 2024-05-25T02:26:30.000Z
## 73 1798 119 66 2024-05-25T01:02:30.000Z
## 74 7249 447 84 2024-05-24T23:13:11.000Z
## 75 3052 246 38 2024-05-24T18:45:24.000Z
## 76 3240 271 29 2024-05-24T14:18:44.000Z
## 77 4536 383 53 2024-05-24T05:31:13.000Z
## 78 28820 1431 1282 2024-05-24T03:06:45.000Z
## 79 17606 1928 1220 2024-05-24T00:17:51.000Z
## 80 8879 981 474 2024-05-23T23:11:43.000Z
## 81 12125 1195 574 2024-05-23T16:25:18.000Z
## 82 13735 1754 1308 2024-05-23T06:48:12.000Z
## 83 15184 1263 1563 2024-05-23T05:06:50.000Z
## 84 11711 924 519 2024-05-23T04:04:30.000Z
## 85 27376 2243 1519 2024-05-23T03:27:22.000Z
## 86 1733 91 396 2024-05-23T01:00:27.000Z
## 87 4041 309 172 2024-05-22T23:35:20.000Z
## 88 3069 139 463 2024-05-22T22:10:45.000Z
## 89 1322 92 44 2024-05-22T20:45:18.000Z
## 90 2116 87 391 2024-05-22T19:20:51.000Z
## 91 23718 1478 645 2024-05-22T17:56:55.000Z
## 92 20801 1245 761 2024-05-22T16:30:56.000Z
## 93 749 175 62 2024-05-22T15:07:39.000Z
## 94 2531 244 344 2024-05-22T13:30:23.000Z
## 95 1144 180 59 2024-05-22T05:30:03.000Z
## 96 1523 210 354 2024-05-22T04:05:29.000Z
## 97 1179 205 66 2024-05-22T02:47:54.000Z
## 98 7636 460 543 2024-05-22T01:35:35.000Z
## 99 749 177 21 2024-05-22T00:20:12.000Z
## 100 1652 203 401 2024-05-21T23:22:41.000Z
En este apartado se crea una gráfica de dispersión en la cual se pueden visualizar la relación de los Likes con las veces compartidas para el candidato Maynez, donde se puede observar que se tienen una relacion, donde las veces compartidas dependiendo de los likes.
library(ggplot2)
# Convertir las columnas likes y convertidos a numéricos
Datosmaynez$likes <- as.numeric(Datosmaynez$likes)
Datosmaynez$shares <- as.numeric(Datosmaynez$shares)
# Crear el gráfico de dispersión
ggplot(Datosmaynez, aes(x = likes, y = shares)) +
geom_point(color = "orange") +
labs(title = "Relación Likes y Compartidos",
x = "Likes",
y = "Compartidos") +
theme_minimal()
En este apartado se crea una gráfica de dispersión en la cual se pueden visualizar la relación de los Likes con los comentarios para el candidato Maynez, donde se puede observar que se tienen una relacion, donde los comentarios dependen de los likes.
library(ggplot2)
Datosmaynez$likes <- as.numeric(Datosmaynez$likes)
Datosmaynez$comments <- as.numeric(Datosmaynez$comments)
# Crear el gráfico de dispersión
ggplot(Datosmaynez, aes(x = likes, y = comments)) +
geom_point(color = "orange") +
labs(title = "Relación Likes y Comentarios",
x = "Likes",
y = "Comentarios") +
theme_minimal()
En este apartado se crea una gráfica de dispersión en la cual se pueden visualizar la relación de los Likes con la hora de la publicación para el candidato Maynez, donde se puede observar que se tienen una relacion, donde se analiza que las publicaciones que se hacen en horas de la noche o a medio díatienen más likes o reacciones.
library(dplyr)
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
library(ggplot2)
library(lubridate)
library(plotly)
## Warning: package 'plotly' was built under R version 4.3.3
##
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
##
## last_plot
## The following object is masked from 'package:stats':
##
## filter
## The following object is masked from 'package:graphics':
##
## layout
# Convertir likes a numérico
Datosmaynez$likes <- as.numeric(Datosmaynez$likes)
# Aplicar función para dar formato al horario
Datosmaynez <- convertir_hora(Datosmaynez)
# Crear el gráfico de dispersión
plot_ly(data = Datosmaynez, x = ~hora, y = ~likes, type = "scatter", mode = "markers",
marker = list(color = "orange", opacity = 0.7)) %>%
layout(
title = list(text = "Relación entre likes y tiempo de publicaciones Maynez"),
xaxis = list(title = "Hora de publicación"),
yaxis = list(title = "Likes"),
showlegend = FALSE
)
En este apartado se importan las librerías que se van a utilizar inicialmente, en este caso readr.
library(readr)
library(lubridate)
En este apartado se manda llamar y se visualiza el dataset con el cual se va a trabajar, en este caso es el dataset de Claudia.csv.
Datosclaudia <- read.csv("C:/R/Claudia.csv")
View(Datosclaudia)
Datosclaudia
## text
## 1 Qué orgullo ver ondear los colores de la bandera de México, representación de la grandeza de nuestra nación. Aquí les dejo una imagen.
## 2 México es el país más bello, sin demeritar otras naciones y pueblos hermanos. Les comparto este paisaje que capturé en el norte.
## 3
## 4 Gracias, gracias, gracias, por tanto. El amor que he recibido me compromete siempre. No les voy a defraudar. Salgamos a votar este 2 de junio. Estoy segura que vamos a hacer historia.
## 5 Este 2 de junio, vamos a hacer historia.\n \n¡Viva la Cuarta Transformación!\n¡Viva el presidente López Obrador!\n¡Viva México, Viva México, Viva México!
## 6 Tengo claro que mi obligación es llevar a México por el sendero de la paz, la seguridad, la democracia, las libertades y la justicia. Tengo claro que nuestra guía es el bienestar y la felicidad del pueblo, tengo claro mi compromiso y mi responsabilidad como la próxima presidenta de México.\n#ClaudiaPresidenta
## 7 Este 2 de junio, vamos seguir haciendo historia. Por primera vez en 200 años de la República, llegaremos las mujeres a la más alta distinción que pueda darnos nuestro pueblo: la Presidencia de México. Y lo digo en plural, porque como lo hemos dicho: no llego sola, llegamos todas, con nuestras abuelas, con nuestras madres, con nuestras hijas y con nuestras nietas.
## 8 Gracias, gracias, gracias. Me comprometo a entregar mi alma, mi vida y lo mejor de mí misma por el bienestar del pueblo de México. Me comprometo con ustedes a ser una buena presidenta que esté a la altura de la generosidad y la grandeza de nuestra historia y de nuestro pueblo.
## 9 Salgamos a votar este 2 de junio para seguir haciendo historia, como lo hicimos en 2018.
## 10 Amor con amor se paga. Juntas y juntos seguiremos haciendo historia. ¡Del Zócalo a la victoria!
## 11 Estoy segura de que este 2 de junio va a triunfar el amor frente al odio, la verdad frente a la calumnia y la democracia frente al fraude. Salgamos a votar todas y todos este domingo todo Morena.
## 12 Este 2 de junio, vota todo Morena.
## 13 Es tiempo de mujeres transformadoras. Les digo a todas, compañeras, amigas, hermanas, hijas, madres: NO ESTÁN SOLAS.
## 14 Les comparto nuestros compromisos con todas y todos los mexicanos para el programa de gobierno 2024-2030.\n#ClaudiaPresidenta
## 15
## 16 Hoy México es respetado en el mundo, es una referencia, es ejemplo de buen desempeño económico y de una política exterior que es un timbre de orgullo.
## 17 La Cuarta Transformación ha levantado el ánimo nacional, nos ha devuelto el orgullo de ser mexicanas y mexicanos.
## 18 Es un honor estar con Obrador.
## 19 Hoy, 29 de mayo, con esta celebración que palpita en el Zócalo, corazón de la República, cerramos nuestra campaña por la presidencia de México. Hay ánimo, alegría que se propaga, esperanza que se respira por todo nuestro territorio y que nos dice que este 2 de junio, una vez más, vamos a hacer historia. Desde aquí lo decimos con fuerza y emoción: del Zócalo a la victoria.
## 20 Amor con amor se paga. Gracias por acompañarnos en ese gran cierre de campaña.
## 21 Los miércoles usamos guinda.
## 22 Del Zócalo a la victoria gracias a todas y todos por acompañarnos.
## 23 Hemos hecho una campaña extraordinaria. Hoy es el último acto de nuestra gira en el Zócalo de la Ciudad de México, en el centro político del país, en la capital de todas y de todos los mexicanos. ¡Del Zócalo a la Victoria! \n\nMe siento honrada porque sé que este próximo domingo vamos a darle continuidad a la Transformación, juntas y juntos, haremos posible la primera mujer presidenta de México. Vamos por el Segundo Piso de la 4T. \n\nLes invito a seguir la transmisión. #EnVivo
## 24 ¡Somos pueblo, con el pueblo y para el pueblo! ¡Vamos pueblo! Esta es la hora de seguir conquistando la esperanza y el porvenir.
## 25 Este 2 de junio, vota todo Morena.
## 26 Hemos hecho una campaña extraordinaria. Hoy es el último acto de nuestra gira en el Zócalo de la Ciudad de México, en el centro político del país. ¡Del Zócalo a la victoria! Nos vemos a las 4 p.m.
## 27 Nos informan que nuestro compañero candidato a gobernador de Yucatán Huacho Díaz Mena sufrió un accidente automovilístico. He hablado con él y con su familia y afortunadamente todos se encuentran bien. Ánimo, este 2 de junio vamos a ganar Yucatán.
## 28 Soy una mujer honrada y privilegiada, por haber tenido la oportunidad de recorrer todo nuestro país; de ver a mujeres y hombres trabajadores. Me siento honrada porque sé que este próximo domingo 2 de junio, vamos a darle continuidad a la Transformación de México.
## 29 ¡Gracias, Jalisco! ❤️
## 30 Caminando rumbo al mitin en Jalisco. ❤️
## 31 Cierre de campaña en Guadalajara, en la explanada del Instituto Cultural Cabañas. Vamos a ganar Guadalajara con Chema Martínez y Jalisco con Claudia Delgadillo. Gracias a todas y todos los que han hecho posible esta maravillosa campaña. Gracias a todas y todos los que nos han acompañado. Más de tres millones de personas en nuestras asambleas. Nos vemos mañana, del Zócalo a la Victoria.
## 32 Ya vamos a tener más tiktoks de Ciencia en un Minuto. No se pierdan el nuevo episodio de nuestro podcast #Sheinboom.\n\n🔴➡️ https://youtu.be/1fJXcDXeXaM?si=iYe12PfoK4RnO2Z_
## 33 Nos vemos mañana en el Zócalo para el gran cierre de campaña a las 4 de la tarde. L@s convoco a que sigamos haciendo historia.
## 34 Seguiremos aumentando el salario mínimo. Este 2 de junio vota todo Morena.
## 35 Guanajuato es el estado con más homicidios del país, pero también el estado con más bajos salarios y más jóvenes con adicciones. León, Guanajuato, llegó a ser la ciudad con más pobreza. Por eso hoy llamé a las familias, a las personas mayores, a las y los jóvenes, para cambiar la historia de Guanajuato. Que dejen el miedo y lo transformen en esperanza, que no vendan su voto, que voten por un gobierno honesto. Este 2 de junio vamos a ganar Guanajuato y todo el país. La Cuarta Transformación representa prosperidad compartida para todo México. Este 2 de junio en Guanajuato 6 de 6. Voten por Alma Alcaraz como gobernadora. Vamos a hacer un gran equipo.
## 36 En Guanajuato vamos a transformar el miedo en esperanza, la inseguridad en paz y la pobreza en bienestar.
## 37 Vamos a promover la obligatoriedad de la seguridad social para las y los trabajadores repartidores de aplicaciones telefónicas.
## 38 ¡Increíble el amor que nos demostraron en León, Guanajuato! Gracias, gracias, gracias.
## 39 ¡Gracias por recibirnos con tanto amor, León, Guanajuato!
## 40 Aumentaremos las becas para estudiantes de educación media superior pública; todos los sistemas de educación superior pública del país serán gratuitos. La educación es un derecho, no es un privilegio, no es una mercancía.
## 41 La Transformación da resultados y por eso queremos su consolidación, en el último trimestre 400 mil personas han pasado de la informalidad a la formalidad en el empleo.\n\n🌐➡️
## 42 Durante el vuelo a Guanajuato, aproveché para continuar escribiendo mi discurso para el gran cierre de campaña. Tengan por seguro que amo a mi patria, y a mi pueblo, que estaré a la altura de las circunstancias. Vamos a gobernar y a hacer política con amor.
## 43 Les recordamos que hoy nos vemos en León, Guanajuato, y en Guadalajara, Jalisco. Mañana tenemos una cita en el Zócalo de la Ciudad de México a las 4:00 pm para el gran cierre de nuestra campaña.
## 44 La Transformación pacífica y democrática que hemos alcanzado es una verdadera hazaña. Es un cambio verdadero sustentado en principios de honestidad, amor al pueblo y amor a la patria. Vamos a seguir haciendo historia.
## 45 Tengo claro que nuestra guía es el bienestar y la felicidad del pueblo. No les voy a traicionar, voy a estar a la altura de las circunstancias, y vamos a seguir haciendo de México el mejor país del mundo.
## 46 Les comparto una reflexión sobre la campaña. Cada mano que toco, cada cara que veo, es un compromiso y la convicción de que no les voy a fallar en seguir la transformación del país, en un México más justo y con más bienestar para el pueblo de nuestro país.
## 47 ¡Gracias Tabasco! ❤️
## 48 En nuestra penúltima semana de campaña estuvimos en La Magdalena Contreras y Benito Juárez, Ciudad de México; Durango, Durango; Hermosillo, Sonora; Chihuahua, Chihuahua; Saltillo, Coahuila; Monterrey, Nuevo León; Naucalpan de Juárez, Estado de México; Xalapa, Veracruz; Puebla, Puebla; Cuernavaca, Morelos; Tuxtla Gutiérrez, Chiapas; y Mérida, Yucatán. Estamos a pocos días de cerrar la campaña y de salir a votar este 2 de junio. #SigamosHaciendoHistoria
## 49 Estamos a 5 días de que hacer escuchar nuestra voz con nuestro voto. No se olviden de ir a votar el domingo #2deJunio y sigamos haciendo historia 🫶🏼. #2deJunio #ClaudiaSheinbaum
## 50 Sin educación, no hay Transformación. Vota todo Morena este 2 de junio.
## 51 No llego sola, llegamos todas. Qué gusto saludarte querida Lorena Ramírez, eres ejemplo de tenacidad y fuerza. Es tiempo de mujeres transformadoras.
## 52 Los estudiantes de preescolar, primaria y secundarias públicas tendrán una beca universal. Este derecho se irá cumpliendo progresivamente en los primeros tres años de mi gobierno.
## 53 Vamos a reconocer el trabajo de las mujeres mexicanas en los hogares y al llegar a los 60 años tendrán un apoyo previo a la pensión universal para adultos mayores.
## 54 Miren qué lindo recibimiento nos dieron en Villahermosa, Tabasco. Cada vez hay más hombres convencidos de que es tiempo de mujeres transformadoras y les digo con certeza que vamos a gobernar para todas y para todos.
## 55 Gracias a Huacho Díaz Mena y a María San Felipe que nos regalaron un gran momento de alegría. Vamos a ganar Yucatán y todo el país. Por una nueva esperanza, por esta nueva forma de servir y trabajar. Por el cambio verdadero en Yucatán y porque siga el cambio verdadero en todo el país.
## 56 Luego de tomar un ratito para preparar nuestro discurso de cierre de campaña, nos despedimos de Mérida, Yucatán, para ir a Villahermosa, Tabasco. Nos vemos en un ratito.
## 57 El presidente nos va a dejar muy avanzado el camino y nosotros lo vamos a consolidar. Vamos a apoyar al IMSS, al ISSSTE y vamos a consolidar el IMSS-Bienestar.
## 58 Este 2 de junio vota todo Morena para que construyamos 1 millón de viviendas.
## 59 Este 2 de junio va a ganar la Transformación en nuestro país, estoy segura porque lo palpo, lo veo, el pueblo de México ya optó por continuar con la Transformación de nuestra patria.
## 60 Ha sido una campaña hermosa que me llevo en el corazón. Este recorrido nos deja mucho amor, sorpresas y recuerdos que comparto con ustedes en este episodio de “Sheinboom”. Me puse al volante y me llevé a La Palomilla a un mitin, les comparto nuestro podcast.\n🔴 YouTube:
## 61 Siempre he admirado a Elena Poniatowska, una mujer libre que ha escrito y estado junto a las causas justas del pueblo de México. Tengo claros los principios y causas de nuestro movimiento. No voy a defraudar. Vamos a ganar el 2 de junio.\n\n
## 62 Me reuní con Alejandra del Moral. Reflexionamos sobre el futuro de nuestro país y encontramos más coincidencias que diferencias: seguir construyendo un México para todos y todas, con justicia, democracia, libertades y prosperidad compartida. Es tiempo de mujeres y es tiempo de la Transformación. Le agradezco su decisión de sumarse a nuestro proyecto en favor del pueblo de México. 🇲🇽
## 63 Somos más los mexicanos y mexicanas que ponemos el amor por encima del odio. Por eso vamos a ganar este 2 de junio. ¡Que viva Yucatán! ¡Que viva México!
## 64 Del Zócalo a la victoria. Nos vemos este miércoles 29 de mayo para seguir haciendo historia.
## 65 Tengo claro que nuestra nación y nuestro pueblo son grandiosos, somos la única opción que representa el bienestar y progreso con justicia. Este 2 de junio, ¡salgamos a votar!
## 66 Llegamos a la última semana de campaña. Les comparto nuestra agenda. #SigamosHaciendoHistoria
## 67 En el Monumento a la Patria en Mérida, Yucatán, ante una asamblea histórica, emocionada les digo que la alegría, esperanza y entrega de este hermoso pueblo a nuestro movimiento es algo que se contagia. ¡Con Huacho Díaz Mena y Rommel Pacheco vamos a ganar Yucatán y Mérida este 2 de junio!
## 68 Les tengo una sorpresa que preparamos especialmente junto con el próximo gobernador de Yucatán, Huacho Díaz Mena. Espérenla pronto.
## 69 ¡Qué gusto estar de vuelta en Yucatán! Vamos con el próximo gobernador de Yucatán, Huacho Díaz, a su cierre de campaña. Nos vemos en un rato en Mérida para hablar de nuestros compromisos con este bello estado del sureste mexicano.
## 70 Gran cierre de campaña en Chiapas con el próximo gobernador Eduardo Ramírez. Gracias. Amor con amor se paga.
## 71 Este 2 de junio, igual que en 2018, vamos a seguir haciendo historia.
## 72 La Cuarta Transformación es construir patria. Es garantizar el porvenir de las actuales y de las futuras generaciones.
## 73 Solo faltan 6 días para salir a votar. Nuestro voto es el arma más poderosa en la elección, nos vemos el #2deJunio para seguir con la Transformación de México.
## 74 Cuando fui jefa de Gobierno en la Ciudad de México hicimos una universidad con el nombre de una gran chiapaneca, Rosario Castellanos, y hoy con el pueblo de este bello estado me comprometí a traerla a su estado natal, Chiapas. Somos los únicos que por convicción, mantendremos los programas sociales.
## 75 Gracias por tu apoyo Camila, seguiremos manteniendo las becas para estudiantes de escuelas públicas. No les vamos a fallar.
## 76 En seis años se ha hecho muchísimo en el país. Vamos a seguir avanzando en la Transformación, es un compromiso con el bienestar de las y los mexicanos.
## 77 Con Eduardo Ramírez, próximo gobernador de Chiapas; nuestr@s candidatos a diputado federal Guillermo Santiago, Flor Esponda; la candidata a diputada local Marcela Castillo; Citlalli Hernández Mora, secretaria general de Morena y Mario Delgado Carrillo, presidente de nuestro partido. Este 2 de junio vota todo Morena.
## 78 Este 2 de junio decidimos hacia dónde se dirige el país y el pueblo de México ha dicho: “Queremos que siga la Cuarta Transformación de la Vida Pública”.
## 79 ¡Gracias al pueblo de Chiapas por el recibimiento! Aquí late muy fuerte la Transformación.
## 80 ¡Gracias por su apoyo, no les voy a defraudar! Juntas y juntos con la comunidad científica y académica, vamos a seguir haciendo historia.
## 81 En todo México late la esperanza de seguir avanzando en la Transformación iniciada en 2018.
## 82 Tres mujeres un camino: el de la Transformación. Este 2 de junio con Alejandra Flores en Cuernavaca y Margarita González Saravia en el estado, vamos a ganar. ¡Viva la Ciudad de la eterna primavera, viva Morelos!
## 83 Hoy les comparto 3 tips para votar este #2dejunio, ¡vamos todo Morena! #ClaudiaSheinbaum #Vota2Junio
## 84 Nunca más un “calladita te ves más bonita”, somos transformadoras, somos guerreras que abrimos brechas a otras mujeres. Somos mujeres de la Cuarta Transformación.
## 85 Gracias Veracruz y Puebla, vamos por el cierre en Morelos. ¡Nos vemos en unos minutos! Vamos a seguir haciendo historia.
## 86 Vamos a ganar Puebla: gobernador Alejandro Armenta, senadores Ignacio Mier Velazco y Liz Sánchez y Pepe Chedraui presidente municipal por Puebla.
## 87 Reunamos a 10 personas y salgamos a votar juntos este 2 de junio. #SigamosHaciendoHistoria
## 88 En la plaza cívica de la heroica Puebla recordé a mujeres que dieron su vida por la patria como la poblana Carmen Serdán, la revolucionaria. Grandes mujeres han forjado nuestra historia: a ellas rendimos homenaje y les digo que no les vamos a fallar. Este 2 de junio les invito a que sigamos haciendo historia.
## 89 Cuando lleguemos al Gobierno de la República vamos a proteger a los niños y a las niñas desde la primera infancia. La esencia de esa protección es el apoyo a las mujeres desde el embarazo.
## 90 Es tiempo de mujeres y de Transformación. Con valentía, convicción, resultados, amor al pueblo, amor por Veracruz y por México, vamos a seguir con la Transformación. Estoy segura, ¡vamos a ganar!
## 91
## 92 Para seguir con la Transformación, vota todo Morena este 2 de junio.
## 93 Las mujeres de 60 a 64 años han dedicado su vida al cuidado de sus familias, es hora de retribuirlas para que puedan gozar de mayor autonomía.
## 94 Hoy conmemoramos el natalicio de Rosario Castellanos, poetisa, mexicana, que a través de sus letras luchó por los derechos de las mujeres y comunidades marginadas. Honramos su memoria y legado cada día al llevar su nombre en las universidades que hicimos en la Ciudad de México y que llevaremos a todo el país.
## 95 Llegamos al bello estado de Veracruz. Nos vemos en un momento en nuestra asamblea y cierre de campaña de Rocío Nahle.
## 96 Este 2 de junio, el pueblo de México tomará una decisión histórica. Les comparto información para que salgamos a votar.
## 97 Gracias a Eugenia León y a Grupo HH por esta canción, no los voy a defraudar. ¡Que viva la Cuarta Transformación!
## 98 Vamos a ganar en Naucalpan y en todo México. Viva la Cuarta Transformación. Viva México. 🇲🇽
## 99 Somos de lucha, vamos a seguir gobernando para que las familias de Naucalpan y del Estado de México puedan vivir con justicia y dignamente. Este 2 de junio, junto a las y los mexiquenses #SeguiremosHaciendoHistoria
## 100 Fortaleceremos el derecho a la vivienda digna. Vamos a construir un millón de viviendas para todas y todos, pero particularmente para l@s jóvenes.
## time likes comments shares
## 1 2024-05-30T22:03:22.000Z 24444 2196 905
## 2 2024-05-30T19:12:04.000Z 22376 2099 592
## 3 2024-05-30T05:23:39.000Z 26642 2479 404
## 4 2024-05-30T05:11:03.000Z 7503 544 752
## 5 2024-05-30T04:04:18.000Z 13094 1016 2414
## 6 2024-05-30T03:18:47.000Z 12323 824 2253
## 7 2024-05-30T02:05:30.000Z 7028 462 476
## 8 2024-05-30T02:03:46.000Z 26863 1953 2668
## 9 2024-05-30T02:00:21.000Z 6806 447 845
## 10 2024-05-30T01:55:07.000Z 9107 457 767
## 11 2024-05-30T01:41:35.000Z 7326 556 1142
## 12 2024-05-30T00:45:14.000Z 6000 383 731
## 13 2024-05-30T00:32:21.000Z 5343 260 654
## 14 2024-05-30T00:24:42.000Z 8279 493 1076
## 15 2024-05-29T23:46:51.000Z 5692 390 544
## 16 2024-05-29T23:33:36.000Z 5434 292 568
## 17 2024-05-29T23:29:23.000Z 4157 139 362
## 18 2024-05-29T23:26:42.000Z 5548 250 569
## 19 2024-05-29T23:24:28.000Z 15745 1262 1905
## 20 2024-05-29T22:52:35.000Z 5910 354 453
## 21 2024-05-29T22:38:38.000Z 5208 230 208
## 22 2024-05-29T22:01:20.000Z 7513 730 575
## 23 2024-05-29T21:57:10.000Z 32752 21621 12327
## 24 2024-05-29T17:47:54.000Z 4823 440 871
## 25 2024-05-29T15:48:36.000Z 8897 824 2991
## 26 2024-05-29T15:06:32.000Z 24529 2567 2635
## 27 2024-05-29T14:22:28.000Z 17823 885 645
## 28 2024-05-29T06:19:21.000Z 6853 988 902
## 29 2024-05-29T05:59:42.000Z 6547 634 766
## 30 2024-05-29T05:08:05.000Z 6686 408 443
## 31 2024-05-29T03:51:59.000Z 11152 827 692
## 32 2024-05-29T03:12:22.000Z 6369 447 585
## 33 2024-05-29T02:08:50.000Z 4501 434 642
## 34 2024-05-29T01:48:37.000Z 4859 370 673
## 35 2024-05-29T00:38:30.000Z 4032 270 613
## 36 2024-05-29T00:17:04.000Z 5882 371 525
## 37 2024-05-28T23:02:17.000Z 2478 174 199
## 38 2024-05-28T21:54:44.000Z 6293 636 623
## 39 2024-05-28T20:43:16.000Z 3625 281 242
## 40 2024-05-28T20:23:51.000Z 2582 176 339
## 41 2024-05-28T19:26:54.000Z 1982 123 121
## 42 2024-05-28T18:31:14.000Z 5760 822 302
## 43 2024-05-28T18:14:39.000Z 6202 733 423
## 44 2024-05-28T18:10:09.000Z 3077 247 326
## 45 2024-05-28T16:44:12.000Z 64916 7832 7656
## 46 2024-05-28T15:43:52.000Z 5378 630 1159
## 47 2024-05-28T04:55:36.000Z 7879 983 1101
## 48 2024-05-28T04:07:19.000Z 3471 261 350
## 49 2024-05-28T03:52:12.000Z 4584 376 350
## 50 2024-05-28T00:46:02.000Z 65544 4359 4976
## 51 2024-05-27T23:40:47.000Z 116379 6117 3154
## 52 2024-05-27T23:29:59.000Z 43318 2866 4158
## 53 2024-05-27T22:44:00.000Z 3513 222 438
## 54 2024-05-27T21:57:56.000Z 5851 386 496
## 55 2024-05-27T21:32:53.000Z 16921 784 3318
## 56 2024-05-27T20:32:07.000Z 48161 2586 2460
## 57 2024-05-27T20:12:00.000Z 2793 229 419
## 58 2024-05-27T19:00:35.000Z 3041 289 460
## 59 2024-05-27T17:47:19.000Z 3350 390 640
## 60 2024-05-27T16:47:11.000Z 3407 346 224
## 61 2024-05-27T16:37:24.000Z 2847 172 218
## 62 2024-05-27T15:11:39.000Z 14846 5186 1949
## 63 2024-05-27T05:56:41.000Z 9014 651 1118
## 64 2024-05-27T04:48:36.000Z 103810 6056 7774
## 65 2024-05-27T04:27:13.000Z 4782 216 601
## 66 2024-05-27T04:01:46.000Z 7162 639 589
## 67 2024-05-27T03:44:00.000Z 6096 399 980
## 68 2024-05-27T02:51:45.000Z 5106 272 353
## 69 2024-05-27T01:05:34.000Z 7129 477 526
## 70 2024-05-26T23:57:28.000Z 5877 304 551
## 71 2024-05-26T23:18:35.000Z 53175 3520 5606
## 72 2024-05-26T21:05:55.000Z 4382 439 768
## 73 2024-05-26T20:15:29.000Z 5950 784 684
## 74 2024-05-26T19:40:07.000Z 4365 361 317
## 75 2024-05-26T19:13:24.000Z 9253 372 594
## 76 2024-05-26T18:18:36.000Z 4219 342 547
## 77 2024-05-26T17:27:10.000Z 4417 360 440
## 78 2024-05-26T16:39:20.000Z 90486 8099 6561
## 79 2024-05-26T15:59:25.000Z 11854 718 718
## 80 2024-05-26T15:40:50.000Z 8098 349 620
## 81 2024-05-26T14:07:13.000Z 6488 394 555
## 82 2024-05-26T05:22:35.000Z 6302 450 499
## 83 2024-05-26T04:38:55.000Z 42469 3198 5631
## 84 2024-05-26T03:22:42.000Z 31079 1568 3060
## 85 2024-05-26T02:19:36.000Z 6653 257 324
## 86 2024-05-26T02:03:30.000Z 5918 439 732
## 87 2024-05-26T01:19:47.000Z 9652 839 947
## 88 2024-05-26T00:54:44.000Z 7738 468 568
## 89 2024-05-26T00:16:27.000Z 4379 355 364
## 90 2024-05-25T22:52:53.000Z 5183 424 985
## 91 2024-05-25T20:54:27.000Z 4174 334 309
## 92 2024-05-25T20:06:06.000Z 17110 1671 1327
## 93 2024-05-25T19:38:20.000Z 5234 418 719
## 94 2024-05-25T18:32:59.000Z 3127 190 232
## 95 2024-05-25T17:37:59.000Z 6568 396 525
## 96 2024-05-25T16:59:43.000Z 4270 434 1017
## 97 2024-05-25T16:17:06.000Z 15233 1604 4886
## 98 2024-05-25T04:53:41.000Z 17719 927 1176
## 99 2024-05-25T03:07:42.000Z 4725 300 350
## 100 2024-05-25T02:43:17.000Z 15209 778 1582
En este apartado se crea una gráfica de dispersión en la cual se pueden visualizar la relación de los Likes con las veces compartidas para la candidata Claudia, donde se puede observar que se tienen una relacion, donde las veces compartidas dependen de los likes.
library(ggplot2)
# Convertir las columnas likes y convertidos a numéricos
Datosclaudia$likes <- as.numeric(Datosclaudia$likes)
Datosclaudia$shares <- as.numeric(Datosclaudia$shares)
# Crear el gráfico de dispersión
ggplot(Datosclaudia, aes(x = likes, y = shares)) +
geom_point(color = "#800020") +
labs(title = "Relación Likes y Compartidos",
x = "Likes",
y = "Compartidos") +
theme_minimal()
En este apartado se crea una gráfica de dispersión en la cual se pueden visualizar la relación de los Likes con los comentarios para la candidata Claudia, donde se puede observar que se tienen una relacion, donde los comentarios dependen de los likes.
library(ggplot2)
Datosclaudia$likes <- as.numeric(Datosclaudia$likes)
Datosclaudia$comments <- as.numeric(Datosclaudia$comments)
# Crear el gráfico de dispersión
ggplot(Datosclaudia, aes(x = likes, y = comments)) +
geom_point(color = "#800020") +
labs(title = "Relación Likes y Comentarios",
x = "Likes",
y = "Comentarios") +
theme_minimal()
En este apartado se crea una gráfica de dispersión en la cual se pueden visualizar la relación de los Likes con la hora de la publicación para la candidata Claudia, donde se puede observar que se tienen una relacion, donde se analiza que las publicaciones que se hacen en horas de la tarde tienen más likes.
library(dplyr)
library(ggplot2)
# Leer los datos de Claudia
Datosclaudia <- read.csv("C:/R/Claudia.csv")
# Convertir likes a numérico
Datosclaudia$likes <- as.numeric(Datosclaudia$likes)
#Aplicar funcion de convertir hora
Datosclaudia <- convertir_hora(Datosclaudia)
# Crear el gráfico de dispersión
plot_ly(data = Datosclaudia, x = ~hora, y = ~likes, type = "scatter", mode = "markers",
marker = list(color = "#800020", opacity = 0.7)) %>%
layout(title = "Relación entre likes y tiempo de publicaciones Claudia",
xaxis = list(title = "Hora de publicación"),
yaxis = list(title = "Likes"),
showlegend = FALSE)
En este apartado se importan las librerías que se van a utilizar inicialmente, en este caso readr.
library(readr)
En este apartado se manda llamar y se visualiza el dataset con el cual se va a trabajar, en este caso es el dataset de Xochilt.csv.
DatosXochilt <- read.csv("C:/R/Xochilt.csv")
View(DatosXochilt)
DatosXochilt
## time comments likes shares
## 1 2024-05-30T05:58:06.000Z 1928 9577 493
## 2 2024-05-30T05:58:03.000Z 6161 55245 1807
## 3 2024-05-30T05:55:05.000Z 4519 28909 1062
## 4 2024-05-30T05:50:26.000Z 1084 6242 431
## 5 2024-05-30T05:50:26.000Z 2163 13340 1288
## 6 2024-05-30T05:47:58.000Z 977 6251 371
## 7 2024-05-30T05:45:33.000Z 186 2510 298
## 8 2024-05-30T05:41:06.000Z 473 6034 325
## 9 2024-05-30T05:36:38.000Z 536 3008 204
## 10 2024-05-30T05:15:15.000Z 137 1626 78
## 11 2024-05-30T05:11:04.000Z 6314 8151 1057
## 12 2024-05-30T04:57:52.000Z 171 1755 65
## 13 2024-05-30T04:34:45.000Z 316 2291 152
## 14 2024-05-30T04:10:42.000Z 259 2175 219
## 15 2024-05-30T04:05:35.000Z 786 5922 463
## 16 2024-05-30T03:48:31.000Z 532 2987 328
## 17 2024-05-30T03:17:44.000Z 764 2569 314
## 18 2024-05-30T03:11:16.000Z 468 2892 186
## 19 2024-05-30T02:45:27.000Z 304 2471 234
## 20 2024-05-30T02:22:31.000Z 384 2214 191
## 21 2024-05-30T02:17:26.000Z 1004 10471 833
## 22 2024-05-30T02:02:45.000Z 358 3015 173
## 23 2024-05-30T01:54:04.000Z 264 2222 248
## 24 2024-05-30T01:13:31.000Z 395 2703 233
## 25 2024-05-30T00:00:41.000Z 637 3677 396
## 26 2024-05-30T00:00:05.000Z 5302 9517 874
## 27 2024-05-29T22:57:56.000Z 568 2641 290
## 28 2024-05-29T21:33:57.000Z 868 3135 268
## 29 2024-05-29T20:27:34.000Z 561 3098 467
## 30 2024-05-29T20:21:13.000Z 1695 13365 1296
## 31 2024-05-29T19:57:32.000Z 774 3050 401
## 32 2024-05-29T19:45:33.000Z 229 2040 199
## 33 2024-05-29T19:28:30.000Z 348 2153 156
## 34 2024-05-29T18:58:49.000Z 316 1814 167
## 35 2024-05-29T18:23:20.000Z 367 2172 152
## 36 2024-05-29T18:04:07.000Z 651 4182 559
## 37 2024-05-29T17:15:07.000Z 492 2342 202
## 38 2024-05-29T17:10:00.000Z 1206 6406 951
## 39 2024-05-29T17:09:59.000Z 4443 10941 1274
## 40 2024-05-29T16:19:40.000Z 1541 8224 1872
## 41 2024-05-29T15:24:39.000Z 1547 7476 1017
## 42 2024-05-29T05:29:32.000Z 1141 5433 397
## 43 2024-05-29T05:02:15.000Z 1410 14831 1477
## 44 2024-05-29T03:45:08.000Z 373 2799 222
## 45 2024-05-29T03:18:50.000Z 445 2559 324
## 46 2024-05-29T03:08:02.000Z 526 2409 228
## 47 2024-05-29T03:05:39.000Z 246 2133 212
## 48 2024-05-29T02:06:40.000Z 2635 5609 407
## 49 2024-05-29T01:39:11.000Z 746 2750 218
## 50 2024-05-29T01:13:52.000Z 1121 13445 440
## 51 2024-05-29T00:55:45.000Z 287 1922 153
## 52 2024-05-29T00:14:18.000Z 245 1755 77
## 53 2024-05-28T23:34:27.000Z 455 2344 230
## 54 2024-05-28T23:26:35.000Z 253 1985 134
## 55 2024-05-28T23:24:04.000Z 136 1727 153
## 56 2024-05-28T22:48:51.000Z 1078 6760 704
## 57 2024-05-28T22:10:17.000Z 567 2635 219
## 58 2024-05-28T22:02:14.000Z 436 2085 180
## 59 2024-05-28T21:58:30.000Z 717 6357 520
## 60 2024-05-28T21:30:53.000Z 337 2198 235
## 61 2024-05-28T20:44:24.000Z 384 2632 273
## 62 2024-05-28T20:10:31.000Z 1213 4495 834
## 63 2024-05-28T19:50:51.000Z 183 1376 167
## 64 2024-05-28T19:43:20.000Z 281 1869 74
## 65 2024-05-28T19:25:52.000Z 3665 16768 1550
## 66 2024-05-28T18:40:13.000Z 575 2807 420
## 67 2024-05-28T17:52:36.000Z 546 2765 224
## 68 2024-05-28T17:49:11.000Z 240 1859 201
## 69 2024-05-28T17:12:25.000Z 2910 15130 1787
## 70 2024-05-28T16:33:41.000Z 404 2528 213
## 71 2024-05-28T16:20:00.000Z 329 2012 261
## 72 2024-05-28T16:19:27.000Z 182 1628 136
## 73 2024-05-28T04:30:09.000Z 1702 10859 901
## 74 2024-05-28T03:24:01.000Z 530 3185 313
## 75 2024-05-28T03:12:15.000Z 733 4331 591
## 76 2024-05-28T02:45:48.000Z 672 3358 421
## 77 2024-05-28T01:46:33.000Z 2100 5081 444
## 78 2024-05-28T01:38:29.000Z 938 3927 646
## 79 2024-05-28T01:09:15.000Z 729 5789 314
## 80 2024-05-28T01:05:57.000Z 450 3907 487
## 81 2024-05-28T00:33:34.000Z 302 2239 247
## 82 2024-05-27T23:37:37.000Z 747 4258 726
## 83 2024-05-27T22:05:40.000Z 774 2768 265
## 84 2024-05-27T21:00:33.000Z 2078 4965 384
## 85 2024-05-27T20:53:16.000Z 584 3095 429
## 86 2024-05-27T20:00:53.000Z 636 2724 274
## 87 2024-05-27T19:45:59.000Z 374 2041 475
## 88 2024-05-27T19:40:33.000Z 1001 7000 389
## 89 2024-05-27T19:13:31.000Z 752 7532 671
## 90 2024-05-27T18:39:16.000Z 340 2327 258
## 91 2024-05-27T18:30:57.000Z 381 3040 462
## 92 2024-05-27T18:14:41.000Z 384 2729 215
## 93 2024-05-27T17:35:44.000Z 1467 8471 512
## 94 2024-05-27T16:47:40.000Z 459 4316 350
## 95 2024-05-27T15:58:38.000Z 1746 4728 510
## 96 2024-05-27T14:31:13.000Z 1066 4316 528
## 97 2024-05-27T05:42:13.000Z 947 5418 225
## 98 2024-05-27T04:00:03.000Z 926 4458 329
## 99 2024-05-27T02:47:29.000Z 790 3018 312
## 100 2024-05-27T02:21:13.000Z 1109 10291 651
## text
## 1
## 2
## 3 Vamos a abrir las puertas de Palacio Nacional para todas y todos.\n\n¡Este 2 de junio todos a votar!\n\n#InundemosLasUrnas\n#XóchitlPresidenta2024\n\n#VotaXóchitl 🩷\n#VotaPAN 💙\n#VotaPRI ❤️\n#VotaPRD 💛
## 4 Si Dios está conmigo, ¿quién contra mí?\n\n#XóchitlPresidenta2024
## 5 Esta ha sido la campaña de los mexicanos que luchamos por la vida, la verdad y la libertad.\n\nLa campaña de quienes defendemos la democracia y las instituciones.\n\nLa esperanza ya cambió de manos y con mucho valor y amor vamos a construir el México que todos queremos.\n\nA todas y todos quienes fueron parte de esta gran campaña y están listos para seguir caminando por un #MéxicoSinMiedo , de corazón MUCHAS GRACIAS.\n\n¡Este 2 de junio vamos a ganar!\n\n#XóchitlPresidenta2024\n#VotaXóchitl\n#VotaPAN\n#VotaPRI\n#VotaPRD
## 6 Yo, Xóchitl Gálvez, la niña de Tepa, la joven que se fue a la ciudad buscando un sueño, la mujer a la que le dijeron que no se podía, hoy está de vuelta aquí en su pueblo natal. \n\nHe venido a pedirles su bendición. Recen mucho por mí y por todos porque el 2 de junio no solo está en juego la Presidencia.\n\nEse día está en juego el alma y el corazón de México.\n\n#XóchitlPresidenta2024
## 7 En mi corazón llevo la esperanza y la fuerza de millones de mexicanos.\nEl futuro de este país está en nuestras manos.\n\nGRACIAS MÉXICO\n¡Nos vemos el 2 de junio!\n\n#XochitlPresidenta2024 #InundemosLasUrnas #VotaPAN #VotaPRI #VotaPRD
## 8 Aquí, con mi pueblo y mi familia, aprendí el valor de servir a los demás.\n\nMi decisión de luchar por la vida, la verdad y la libertad está anclada en estas profundas raíces.\n\nVamos a ganar este domingo y el lunes habrá un nuevo amanecer, un nuevo sol de justicia y esperanza.\n\n¡Todos a votar el 2 de junio!\n\n#XóchitlPresidenta2024
## 9 Además de mentirosa, copiona.🙄#XóchitlGálvez #Politica #Humor #Original #Celebrity
## 10 Jóvenes: que nadie les diga que no pueden. Siempre crean en ustedes mismos. Si se lo proponen, pueden cambiar al mundo. 🩷🩷🤗🤗#XóchitlGálvez #Politica #Jovenes #Apoyo #Mujeres #Motivacion
## 11 En este lugar de piedras y arcilla nací y desde aquí les digo: voy a ser la próxima Presidenta para traer amor y unidad donde hoy hay odio y división. \n\n#DeTepaALaPresidencia
## 12 No saben el orgullo que me da portar prendas hechas por manos mexicanas. 🇲🇽🩷 #XóchitlGálvez #Politica #Mujeres #Mexico #Arte #Moda
## 13 Estoy segura que vamos a ganar si gran parte de la población sale a votar. ¡A inundar las urnas!🗳️🗳️🗳️🗳️🗳️🗳️🗳️🗳️🗳️🗳️#XóchitlGálvez #Politica #Monterrey #Mexico #Elecciones #Motivacion
## 14 Como Presidenta me voy a asegurar que respires aire limpio y no te falte el agua. Gracias, Monterrey. 🩷#XóchitlGálvez #Politica #Monterrey #Agua #Motivacion
## 15 Desde la Sultana del Norte les digo:\n\nSomos más los buenos y nosotros saldremos a votar para defender la vida, la verdad y la libertad. \n\n#VotaXóchitl\n#VotaPAN\n#VotaPRI\n#VotaPRD
## 16 Van a tener a la presidenta más valiente, una presidenta que va a enfrentar a la delincuencia. \n\nVoy a cuidar de sus hijas y de sus hijos, voy a cuidar de sus familias.\n\nPara un México de vida, verdad y libertad, necesito su voto este 2 de junio. \n\n#XochitlPresidenta2024 #InundemosLasUrnas #VotaPAN #VotaPRI #VotaPRD
## 17 ¿Tú también ya estás cansado de que Claudia Sheinbaum te intente ver la cara con sus mentiras?\n\nPues este 2 de junio tenemos la oportunidad histórica de que asuman las consecuencias.\n\n#InundemosLasUrnas con Fuerza y Corazón.\n\n#LasMentirasDeClaudia
## 18 México va a tener una Presidenta que se preocupe por tu seguridad, tu educación y tu salud. 🩷🗳️#XóchitlGálvez #Politica #Salud #Educacion #Seguridad#Yucatan #Motivacion
## 19 Vamos a llegar a la Presidencia a servir, nunca a servirnos.\n\n#XóchitlPresidenta2024
## 20 🗳️🗳️Vamos a inundar las urnas el domingo. No te creas los cuentos de que van arriba. Si sales a votar, ¡ganamos nosotros!🗳️🗳️#XóchitlGálvez #Politica #Edomex #Verdad #Motivacion
## 21 Ser de Nuevo León es símbolo de trabajo, esfuerzo y liderazgo.\n\nNosotros vamos a construir un proyecto de verdad, donde nadie se quedará atrás y que luche por la vida, la verdad y la libertad.\n\n¡Todos a votar este 2 de junio! ¡Muchas gracias!\n\n#XóchitlPresidenta2024
## 22 No hay palabras para expresar la indignación que siento por el asesinato de Alfredo Cabrera, candidato a presidente municipal de Coyuca, Guerrero.\n\nLo conocí personalmente durante la brigada tras el huracán Otis y sé que era un hombre generoso y de bien.\n\nMi más sentido pésame a su familia, a sus amigos y a todo el pueblo de Coyuca de Benítez. Descanse en paz.
## 23 Palacio Nacional volverá a ser el lugar del pueblo y para el pueblo.\n\nLes garantizo que siempre les voy a hablar con la verdad y juntos vamos a construir un país de libertades, un país democrático.\n\nEste 2 de junio necesito de todas y de todos.\n\n#XochitlPresidenta2024 #InundemosLasUrnas #VotaPAN #VotaPRI #VotaPRD
## 24 Si a ti tampoco te gusta un México con mentiras, vota PAN, PRI, PRD este 02 de junio. 💙❤️💛#XóchitlGálvez #Politica #Verdad #Vida #Yucatan #Motivacion
## 25 Yo me mando sola. 😎#XóchitlGálvez #Mujeres #Politica #Celebrity
## 26 Gran cierre de campaña desde Monterrey, Nuevo León.\n\n#XóchitlPresidenta2024
## 27 Vota y bótalos por ineptos, corruptos y mentirosos. ☝️ #XóchitlGálvez #Yucatan #RénanGobernador #VotaCeciliaAlcaldesa #VilaSenador #Politica #Celebrity
## 28 ¡Este domingo 02 de junio vota para que México pueda ser tan seguro como Yucatán! 🗳️👮
## 29 El 02 de junio hay que salir a votar para botarlos. Ya basta de tanta mentira. #XóchitlGálvez #Politica #Jalisco #Chiapas #Motivacion
## 30 Ya basta de que los mexicanos no puedan subirse al transporte público sin que los asalten.\n\nCuando sea Presidenta vamos a aplicarle la ley a quien se atreva a robarte. Conmigo, te aseguro que vas a poder llegar con bien a tu casa y a tu trabajo.\n\n¡Este 2 de junio todos a votar por la vida, la verdad y la libertad!\n\n¡Con todo Estado de México! \n\n#XóchitlPresidenta2024
## 31 Claudia Sheinbaum te miente a la cara porque es una mujer fría e insensible ante el dolor de los mexicanos.\n\nTú te mereces una Presidenta que te entienda, te escuche y te hable con la verdad.\n\nPor eso este 2 de junio #VotaXóchitl.\n\n#LasMentirasDeClaudia
## 32 Vamos a ganar para servir, para trabajar, para tener un México próspero y en paz.\n\nNecesito tu voto este 2 de junio. ¡Vamos juntos por la vida, la verdad y la libertad! \n\n#InundemosLasUrnas #XochitlPresidenta2024
## 33 🗳️ Es fundamental un alta participación electoral para poder ganar el domingo. ¡Sal y vota para vivir sin miedo! #XóchitlGálvez #Politica #Motivacion
## 34 El México unido y sin divisiones que nos merecemos está muy cerca.\n\nComo Presidenta voy a gobernar para todas y todos.\n\n#XóchitlPresidenta2024
## 35 El día de la elección vota por la vida, la verdad y la libertad. Vota PAN, PRI, PRD. 🗳️💙❤️💛#XóchitlGálvez #Politica #Vida #Queretaro #Motivacion
## 36 El México con vida, verdad y libertad es posible. Para lograrlo, este 2 de junio #InundemosLasUrnas y #VotaXóchitl.\n\nTú elige cómo, tienes tres opciones:\n\n#VotaPAN 💙\n#VotaPRI ❤️\n#VotaPRD 💛
## 37 Se acabaron los abrazos, les vamos a aplicar La Ley. #XóchitlGálvez #Jalisco
## 38 #GraXias a quienes se han sumado a esta lucha que es de todos. \n\nEn cada momento hemos estado juntos: en los eventos y en las redes sociales.\n\nYa estamos muy cerca, falta lo más importante y es nuestra nueva tarea: salir a votar este 2 de junio.\n\n#InundemosLasUrnas\n#XóchitlPresidenta2024
## 39 Los necesito a todas y a todos en las urnas este 2 de junio para inaugurar una nueva era de prosperidad y progreso para nuestro país.\n\nGran cierre de campaña desde Los Reyes Acaquilpan, La Paz, Estado de México.
## 40 ¡Vamos a ganar!\n\n#XóchitlPresidenta
## 41 Esta carrera la vamos a ganar todas y todos juntos.\n\nGracias por acompañarme desde el inicio. Ya estamos en el último tramo.\n\nA apretarle y alzarnos con la victoria.\n\n#ElMejorRelevoEresTú
## 42 Nos vemos este miércoles 29 de mayo para nuestro gran cierre de campaña en Nuevo León.\n\nLos espero a las 4 de la tarde en la Arena Monterrey para defender la vida, la verdad y la libertad.\n\nEstaré muy contenta de saludar a toda la gente xingona del norte. 🤞🏼
## 43 Yucatán ya despertó y vamos a ganar.\n\nAquí no van a entrar los ineptos que no saben gobernar. De la mano de Renán Barrera y todos los candidatos de Fuerza y Corazón, los yucatecos van a poder seguir saliendo a las calles sin sentir miedo.\n\n¡Todos a votar este 2 de junio!
## 44 En mi gobierno quien se meta con una mujer se va a meter con la Presidenta.\n\nAsí como con Verónica, voy a seguir trabajando para que ninguna mujer de México sufra violencia.\n\n#VotaXMéxico #VotaXóchitl \n\n#VotaPAN #VotaPRI #VotaPRD
## 45 Nosotros vamos a terminar con el odio y la división.\n\n¡Llegó el momento de un México unido de verdad!\n\n#MerecesMás\n#InundemosLasUrnas
## 46 🗳️El domingo vas a tener dos opciones: votar porque siga la violencia, el desabasto de medicamentos y el autoritarismo, o votar para que haya energías limpias, seguridad, agua y democracia. 🩷 #XóchitlGálvez #Politica #Mexico #Salud #Seguridad #Agua #Motivacion
## 47 De este lado estamos los mexicanos que vamos a luchar por la vida, la verdad y la libertad.\n\nEste 2 de junio #InundemosLasUrnas.\n\n#MerecesMás
## 48 Con Renán Barrera y su servidora, Yucatán seguirá siendo referente en todo el país en seguridad pública. Quiero que así como en este estado, los mexicanos puedan salir a la calle sin sentir miedo.\n\nMensaje desde Mérida.
## 49 El domingo vota para que no haya desabasto de medicamentos, no nos falte el agua y se acaben los abrazos a los delincuentes. 🏥💦🚨 #XóchitlGálvez #Medicina #Agua #Seguridad #Politica #Motivacion
## 50 Hace unos meses, Don Benito me abrió las puertas de su corazón y de su casa en Villahermosa, Tabasco. \n\nHoy me entero de su fallecimiento. Mis oraciones y mi abrazo cariñoso a familia y amigos. \n\nNos quedaremos siempre con su ejemplo de vida y sencillez. Descanse en paz.\n\nhttps://www.facebook.com/share/v/g9vKGhV3ZgnRim8P/?mibextid=Tifg6m
## 51 Este domingo vota para que México sea el mejor en todo: en ciencia, tecnología, salud y también en fútbol. ⚽️😎🩷 #XóchitlGálvez #Futbol #Politica #Deporte #Humor #Celebrity
## 52 Estoy segura que en 2026 tendremos el mejor mundial que la historia haya visto. ¡Mi sexenio será el sexenio del fútbol! 🩷🏆⚽️#XóchitlGálvez #Futbol #Deporte #Mundial #Politica #Celebrity
## 53 Salgamos a votar para lograr que triunfen la vida, la verdad y la libertad.\n\nEste 2 de junio, ¡sin miedo México!\n\n#XóchitlGálvezPresidenta #MerecesMás #VotaPRD
## 54 #Respuesta Este domingo vota para que vuelvan los apoyos a la cultura. Estoy convencida que la cultura será el gran pacificador de México.🎭🎨 #XóchitlGálvez #Cultura #Arte #Jovenes #Apoyo #Politica #Motivacion
## 55 Así como lo hice con Teresa, como Presidenta voy a seguir apoyando a las mujeres emprendedores a superarse.\n\nVota con Fuerza y Corazón este 2 de junio para que a ti, a tus hijos y a tu familia les vaya bien.\n\n#MerecesMás\n#VotaXMéxico #VotaXóchitl \n\n#VotaPAN #VotaPRI #VotaPRD
## 56 Como hermana de un general del ejército, respeto y reconozco a nuestras Fuerzas Armadas.\n \nSeré una Presidenta que defienda su honor, cuide de ustedes y sus familias y los apoye siempre. \n\nConmigo, sus sacrificios serán reconocidos y recompensados por el gobierno y la sociedad.
## 57 #Respuesta Los programas sociales se quedan. Las pensiones para adultos mayores serán desde los 60 años. 🩷🤝👵🏽👴🏽 #XóchitlGálvez #Politica #Apoyo #Amor #Motivacion
## 58 🩷 TAREA IMPORTANTE 🩷\n\nNecesito que todos me ayuden a cuantificar el despilfarro de campaña de la candidata de las mentiras. Te explico cómo:\n\n1. Baja y regístrate en la app REDEX. Aquí abajo te dejo las ligas de AppStore de Apple y PlayStore de Android. \n\n2. Cuando veas una lona, barda o espectacular de Claudia abre tu app para reportarla. También si encuentras publicidad en redes sociales o un volanteo. \n\n3. Llena toda la información que te pidan en la aplicación. \n\n¡Y listo! Con eso nos ayudas muchísimo. No olvides ir a votar este domingo 2 de junio. \n\nhttps://play.google.com/store/apps/details?id=mx.redex.appX&pcampaignid=web_share\n\nhttps://apps.apple.com/mx/app/redex/id6473295236
## 59 Mi gobierno va a ser un gobierno federalista, vamos a recuperar a los municipios como el centro del gobierno porque ahí es donde están los problemas.\n\nVamos a trabajar con los gobiernos municipales de Querétaro y de todo México para mejorar la seguridad pública.\n\nPor eso cuando sea Presidenta ningún policía va a ganar menos de 20 mil pesos. Es la hora de cuidar a quienes nos cuidan.\n\n¡Muchas gracias San Juan del Río, Querétaro! ¡A votar este 2 de junio!\n\n#MerecesMás
## 60 Los jóvenes de México sí pueden tener el futuro que se merecen y cumplir sus sueños.\n\n#XóchitlGálvezPresidenta #MerecesMás #VotaPRD
## 61 Los Simpson saben cosas. 😏#XóchitlGálvez #Simpson #Humor #Politica #Celebrity
## 62 Los mexicanos estamos cansados de #LasMentirasDeClaudia.\n\nPor eso este 2 de junio vamos a votar para botarlos.\n\n#MerecesMás
## 63 Los malos gobiernos de Morena nos han arrebatado todo… todo menos la esperanza.\n\n#XóchitlGálvezPresidenta #MerecesMás #VotaPRD
## 64 En la campaña ya hasta los accesorios tienen nombre. Por ejemplo, a mi bolsa, que luego no encontramos, le decimos “La Wendy”. ¡Por perdida! 🤣👜#XóchitlGálvez #Politica #Humor #Moda
## 65 Vamos a recuperar el honor y la dignidad de nuestras Fuerzas Armadas.\n\nComo su Comandante en Jefe voy a luchar para mejorar los ingresos y calidad de vida de los integrantes del Ejército, la Marina y la Fuerza Aérea.
## 66 Aquel que se meta con una mujer se va a meter con la Presidenta de México. 💪 #XóchitlGálvez #Mujeres #Feminismo #Politica #Chiapas #Motivacion
## 67 Vota para que los jóvenes tengan la oportunidad de aprender inglés. #XóchitlGálvez
## 68 ¡Qué nadie te diga que no se puede!\n\nSomos millones de corazones que el próximo domingo vamos inundar las urnas y salir victoriosos.\n\n#InundemosLasUrnas\n#MerecesMás
## 69 Aquí te explico cómo debes votar este domingo para que tu voto cuente y ganemos todos. \n\nMándale este video a tu familia, a tus amigos y a tus vecinos que quieren construir juntos un país con vida, verdad y libertad. \n\n#InundemosLasUrnas
## 70 Quiero dormir sin deberle a la justicia, quiero un país sin duelo y sin madres buscando a sus hijas. \n\nNo voy a fallarle a México. \n\nVoy a ser aliada, voy a luchar con ustedes, voy a cuidarlas, apoyarlas y defenderlas. Voy a ser su #CompañeraPresidenta. \n\nCuenta con ello, Vivir Quintana.
## 71 Ya es momento de que llegue un gobierno que te hable con la verdad.\n\nEste 2 de junio vota para botar a los malos y corruptos gobiernos de Morena.\n#MerecesMás #VotaPRD #XóchitlPresidenta
## 72 Tenemos dos opciones: avanzar hacia un futuro donde todos puedan salir adelante o quedarnos como estamos.\n\nPor eso este 2 de junio sal a votar con Fuerza y Corazón.\n\n#VotaXMéxico #VotaXóchitl \n\n#VotaPAN #VotaPRI #VotaPRD
## 73 En México hay elecciones limpias y democráticas y el próximo domingo lo vamos a demostrar.\n\nMillones de mexicanos van a salir a votar contra el autoritarismo, contra la mentira, contra la violencia, contra la división.\n\n¡Cuento con ustedes, Jalisco!\n\n¡Vamos con todo Laura Haro Ramírez!
## 74 Quienes quieren gobernar tienen que tener una causa y la mía es ayudar a quienes más lo necesitan.\n\nYa lo he hecho durante toda mi vida. Ahora lo haré como Presidenta.\n\n#VotaXMéxico #VotaXóchitl \n\n#VotaPAN #VotaPRI #VotaPRD
## 75 Que jamás te digan que no se puede. Los mexicanos podemos lograr todo lo que nos propongamos. 💪🤝💜🩷#XóchitlGálvez #Chiapas #Mujeres #Motivacion
## 76 ¡Todos a votar el domingo por el PAN, PRI, PRD! Lo vamos a lograr con tu apoyo. 🩷🇲🇽 #XóchitlGálvez #Politica #Hidalgo #Pachuca #Motivacion
## 77 Vamos a ganar para recuperar al campo de México y terminar con la extorsión de los criminales.\n\nMensaje desde Ciudad Guzmán, Jalisco.
## 78 Cuando Claudia ganó la Jefatura de Gobierno, me invitó a ser su City Manager y el Presiente me invitó a ser parte de su gabinete. Si fuera tan corrupta como dicen, no me hubieran invitado a su proyecto. Otra prueba más de sus mentiras. 🤷♀️ #XóchitlGálvez #Politica #Humor #Clauchitl #Celebrity
## 79 Este 2 de junio Jalisco me va a acompañar.\n\nVamos a gobernar juntos y desde el corazón. Vamos. A gobernar para los que menos tienen, pero también a impulsar a que este país tenga más riqueza.\n\n¡Gracias, Guadalajara!\n\n#XóchitlPresidenta
## 80 Mi trabajo por Chiapas es de toda la vida.\n\n#XóchitlPresidenta
## 81 Vamos a ganar para escuchar, para unir y para servir. Este domingo 02 de junio vota PAN, PRI, PRD. 🗳️🩷#XóchitlGálvez #Politica #Apoyo #Mexico #Motivacion
## 82 Los motivos sobran para votar y botarlos este 2 de junio.\n\n#XóchitlPresidenta
## 83 México requiere una Presidenta que tenga el corazón y la empatía para combatir la pobreza. 🩷🤝#XóchitlGálvez #Politica #Apoyo #Mexico #Celebrity
## 84 Vamos a crear una agencia para apoyar a emprendedores. Con ella generaremos empleos y prosperidad para todos.\n\nMensaje desde Guadalajara, Jalisco.
## 85 En lugar de andar mirando para otro lado, mi administración va a mejorar las condiciones de los médicos mexicanos. 🏥👨⚕️🇲🇽#XóchitlGálvez #Politica #Medicina #Cuba #Mexico #Motivacion
## 86 ¡México ya despertó! 🇲🇽\n\nLo demostramos en las calles y el 2 de junio lo vamos a demostrar en las urnas.\n\n#XóchitlPresidenta #VotaPRD
## 87 Va es hora de que el gobierno combata a la delincuencia y no le dé abrazos. Tu seguridad será mi prioridad. 👮🚨🚔 #XóchitlGálvez #Politica #Seguridad #Motivacion
## 88 Siéntanse orgullosos: van a tener a la primera mujer hidalguense Presidenta de la República.\n\nApóyenme por ustedes, por sus hijos y por su familia. \n\nTodos a votar este 2 de junio con Fuerza y Corazón.\n\n#XóchitlPresidenta
## 89 Yo sí me voy a preocupar por la salud de los habitantes de Hidalgo, de CDMX y de todo el país.\n\nPor eso me comprometo a que como Presidenta voy a acelerar la introducción del gas natural para dejar de quemar combustóleo en la termoeléctrica de Tula.\n\n¡Muchas gracias Pachuca!
## 90 ¡Vamos por un solo México! Solo así, juntos, podremos prosperar. 🩷🤗 #XóchitlGálvez #Politica #Jovenes #Humor #Mexico #Motivacion
## 91 ¡VIDA! ¡VERDAD! ¡LIBERTAD!\n\n#XóchitlPresidenta #VotaPRD
## 92 México necesita de la vocación de justicia social y la perseverancia del Partido de la Revolución Democrática PRD💛\n\nVamos a darlo todo para que seamos esa nación democrática por la que siempre hemos luchado.\n\n#VotaPRD
## 93 Primero los pobres, sí, pero en que dejen de ser pobres.\n\nVamos a seguir llevando servicios básicos e infraestructura a todo el país para que puedas salir adelante.\n\n#VotaXMéxico #VotaXóchitl \n\n#VotaPAN #VotaPRI #VotaPRD
## 94 Comparto la lucha y los sueños de miles de mujeres indígenas en todo México.\n\nGracias Lucrecia por elegir el camino de la vida, la verdad y la libertad.\n\n#VotaXMéxico #VotaXóchitl \n\n#VotaPAN #VotaPRI #VotaPRD
## 95 Conmigo todos vamos a caminar como un solo país, como hermanos que somos. Basta de odio y de división.\n\nMensaje desde Pachuca, Hidalgo.
## 96 En esta campaña la verdad le ganó a las mentiras de Morena.\nEl 2 de junio vota para botarlos y que dejen de verte la cara.\n\n#XóchitlPresidenta #VotaPRD
## 97 Morelos ya decidió que el cambio lo vamos a hacer todas y todos con Lucy Meza.\n\n¡Ya basta de malos gobiernos! Llegó el momento de traer vida, verdad, libertad y prosperidad.\n\n¡Gracias Cuernavaca!
## 98 ¡Gracias, Estado de México! Con su apoyo vamos a triunfar este 02 de junio. 🩷🗳️ #XóchitlGálvez #Politica #Mexico #Victoria #Celebrity
## 99 Dijeron que barrerían la corrupción. Con lo que barrieron fue con los recursos públicos. 🙄💸👎#XóchitlGálvez #Politica #Elecciones #Motivacion
## 100 Tengan la certeza que voy a trabajar de la mano con mi querido Pepe Yunes.\n\nVamos a ganar para reconciliar a las víctimas con la justicia, por eso yo les pido que inauguremos esta nueva era de prosperidad para todos.\n\nCréanme, tenemos el triunfo a tiro de piedra. ¡Ya los tenemos!\n\n#Xóchitl2024
En este apartado se crea una gráfica de dispersión en la cual se pueden visualizar la relación de los Likes con las veces compartidas para la candidata Xochilt, donde se puede observar que se tienen una relacion, donde las veces compartidas dependen de los likes.
library(ggplot2)
# Convertir las columnas likes y shares a numéricas
DatosXochilt$likes <- as.numeric(DatosXochilt$likes)
DatosXochilt$shares <- as.numeric(DatosXochilt$shares)
# Crear el gráfico de dispersión
ggplot(DatosXochilt, aes(x = likes, y = shares)) +
geom_point(color = "#3498DB") +
labs(title = "Relación Likes y Compartidos",
x = "Likes",
y = "Compartidos") +
theme_minimal()
En este apartado se crea una gráfica de dispersión en la cual se pueden visualizar la relación de los Likes con los comentarios para la candidata Xochilt, donde se puede observar que se tienen una relacion, donde los comentarios dependen de los likes.
library(ggplot2)
DatosXochilt$likes <- as.numeric(DatosXochilt$likes)
DatosXochilt$comments <- as.numeric(DatosXochilt$comments)
# Crear el gráfico de dispersión
ggplot(DatosXochilt, aes(x = likes, y = comments)) +
geom_point(color = "#3498DB") +
labs(title = "Relación Likes y Comentarios",
x = "Likes",
y = "Comentarios") +
theme_minimal()
En este apartado se crea una gráfica de dispersión en la cual se pueden visualizar la relación de los Likes con la hora de la publicación para la candidata Xochilt, donde se puede observar que se tienen una relacion, donde se analiza que las publicaciones que se hacen en horas de la tarde, tienen más likes.
library(dplyr)
library(ggplot2)
# Convertir likes a numérico
DatosXochilt$likes <- as.numeric(DatosXochilt$likes)
# Aplicar funcion de formato
DatosXochilt <- convertir_hora(DatosXochilt)
# Crear el gráfico de dispersión
plot_ly(data = DatosXochilt, x = ~hora, y = ~likes, type = "scatter", mode = "markers",
marker = list(color = "#3498DB", opacity = 0.7)) %>%
layout(title = "Relación entre likes y tiempo de publicaciones Xochilt",
xaxis = list(title = "Hora de publicación"),
yaxis = list(title = "Likes"),
showlegend = FALSE)
En este apartado se crea una gráfica de barras en la cual se analiza y visualizan el total de likes que se tienen por candidato, esto para indicar cual de los e candidatos obtuvo un total de likes mayor, donde se detecta que Claudia es la candidata con mas likes, mostrando asi que ella tiene un total de más de likes de 1.39 millones de likes, seguido de Maynez con un total de más de 582 mil likes y por último Xocjilt con casi la misma cantidad de likes que Maynez un aproximado de mas de 538 mil likes.
library(readr)
Maynez <- read.csv("C:/R/Maynez.csv")
Claudia <- read.csv("C:/R/Claudia.csv")
Xochilt <- read.csv("C:/R/Xochilt.csv")
Maynez_likes <- sum(Maynez$likes)
Claudia_likes <- sum(Claudia$likes)
Xochilt_likes <- sum(Xochilt$likes)
total_likes <- data.frame(
Persona = c("Maynez", "Claudia", "Xochilt"),
Likes = c(Maynez_likes, Claudia_likes, Xochilt_likes)
)
library(plotly)
library(dplyr)
# Calcular el total de likes por persona
total_likes <- data.frame(
Persona = c("Maynez", "Claudia", "Xochilt"),
Likes = c(sum(Maynez$likes), sum(Claudia$likes), sum(Xochilt$likes))
)
# Crear el gráfico de barras con plotly
fig <- plot_ly(total_likes, x = ~Persona, y = ~Likes, type = 'bar',
marker = list(color = c("orange", "#800020", "#3498DB"))) %>%
layout(title = "Total de Likes por Candidato",
xaxis = list(title = "Candidato"),
yaxis = list(title = "Total de Likes"),
hoverlabel = list(bgcolor = "white",
font = list(family = "Arial", size = 14, color = "black")))
fig
En este apartado se crea una gráfica de barras en la cual se analiza y visualizan el total de comentarios que se tienen por candidato, esto para indicar cual de los candidatos obtuvo un total de comentarios mayor, donde se detecta que Claudia es la candidata con más comentarios, mostrando asi que ella tiene un total de comentarios de más de 125 mil comentarios en sus publicaciones, seguida de Xochilt con más de 100 mil comentarios y por último Maynez con las de 50 mil comentarios.
library(readr)
# Leer los datos de los archivos CSV
Maynez <- read_csv("C:/R/Maynez.csv")
## Rows: 100 Columns: 5
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (1): text
## dbl (3): likes, comments, shares
## dttm (1): time
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
Claudia <- read_csv("C:/R/Claudia.csv")
## Rows: 100 Columns: 5
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (1): text
## dbl (3): likes, comments, shares
## dttm (1): time
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
Xochilt <- read_csv("C:/R/Xochilt.csv")
## Rows: 100 Columns: 5
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (1): text
## dbl (3): comments, likes, shares
## dttm (1): time
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
# Calcular el total de comentarios por cada candidato
Maynez_comments <- sum(Maynez$comments)
Claudia_comments <- sum(Claudia$comments)
Xochilt_comments <- sum(Xochilt$comments)
# Crear el data frame con los totales de comentarios
total_comments <- data.frame(
Persona = c("Maynez", "Claudia", "Xochilt"),
Comments = c(Maynez_comments, Claudia_comments, Xochilt_comments)
)
library(plotly)
# Crear la gráfica de barras con plotly
fig <- plot_ly(total_comments, x = ~Persona, y = ~Comments, type = 'bar',
marker = list(color = c("orange", "#800020", "#3498DB"))) %>%
layout(title = "Total de Comentarios por Candidato",
xaxis = list(title = "Candidato"),
yaxis = list(title = "Total de Comentarios"),
hoverlabel = list(bgcolor = "white",
font = list(family = "Arial", size = 14, color = "black")))
fig
En este apartado se crea una gráfica de barras en la cual se analiza y visualizan el total de veces compartidas que se tienen por candidato, esto para indicar cual de los candidatos obtuvo un total de veces compartidas mayor, donde se detecta que Claudia es la candidata con más comentarios, mostrando asi que ella tiene un total de comentarios de más de 137 mil veces compartidos en sus publicaciones, seguida de Xochilt con más de 46 mil veces compartidos y por último Maynez con más de 40 mil veces compartidas.
library(readr)
# Leer los datos de los archivos CSV
Maynez <- read_csv("C:/R/Maynez.csv")
## Rows: 100 Columns: 5
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (1): text
## dbl (3): likes, comments, shares
## dttm (1): time
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
Claudia <- read_csv("C:/R/Claudia.csv")
## Rows: 100 Columns: 5
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (1): text
## dbl (3): likes, comments, shares
## dttm (1): time
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
Xochilt <- read_csv("C:/R/Xochilt.csv")
## Rows: 100 Columns: 5
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (1): text
## dbl (3): comments, likes, shares
## dttm (1): time
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
# Calcular el total de compartidos ("shares") por cada candidato
Maynez_shares <- sum(Maynez$shares)
Claudia_shares <- sum(Claudia$shares)
Xochilt_shares <- sum(Xochilt$shares)
# Crear el data frame con los totales de compartidos
total_shares <- data.frame(
Persona = c("Maynez", "Claudia", "Xochilt"),
Shares = c(Maynez_shares, Claudia_shares, Xochilt_shares)
)
library(plotly)
# Crear la gráfica de barras con plotly
fig <- plot_ly(total_shares, x = ~Persona, y = ~Shares, type = 'bar',
marker = list(color = c("orange", "#800020", "#3498DB"))) %>%
layout(title = "Total de Compartidos por Candidato",
xaxis = list(title = "Candidato"),
yaxis = list(title = "Total de Compartidos"),
hoverlabel = list(bgcolor = "white",
font = list(family = "Arial", size = 14, color = "black")))
fig
Según el análisis previamente realizado se puede decir que la hora en la que se hacen las publicaciones es un factor muy importante para poder obtener un número mayor de likes o reacciones, de comentarios y de veces compartidas en las pubicaciones, ya que según se observó en los 3 candidatos se tiene una mayor interacción en horas nocturnas, así como se observó que los likes tienen relación con los comentarios y las veces compartidas, ya que todo va de la mano. Importante mencionar que tanto en los likes como en los comentarios y las veces compartidas la candidata Claudia es quien tiene un mayor número, mostrando así que ella al menos es las publicaciones de facebook tienen una gran ventaja y aceptación por parte de las personas, indicando además que Xochilt está en segundo lugar y hasta el final está Maynez, únicamente en los likes Maynez ocupa el segundo lugar y tercero Xochilt, indicando así que Maynez es quien parece tener menos aceptación por parte de las personas, esto según su interacción en sus publicaciones de facebook.