---
title: "Haciendo memes"
author: "Yo"
format: html
embed-resources: true
---


# Haciendo memes

Primero hemos de tener instalado el paquete `meme` y tenerlo cargado en la sesión de R

```{r}
#- Para poder usar el paquete, este tiene q estar instalado y cargado
library(meme)    #- install.packages("meme")
```

Después vamos a definir las rutas a las imágenes que vamos a usar

```{r}
ruta_a_imagen_1 <- "./imagenes/success.jpg"

ruta_a_imagen_3 <- "https://upload.wikimedia.org/wikipedia/commons/thumb/f/f1/Nacho_Vegas_-_Rock_%26_Clown_-_A_Estrada.jpg/120px-Nacho_Vegas_-_Rock_%26_Clown_-_A_Estrada.jpg"
```


## Primer meme

Usamos una imagen local

```{r}
meme::meme(img = ruta_a_imagen_1,
           upper = "SÍ q puedes!!!",
           lower = "Tú puedes aprender R!!", 
           size = 2.0, 
           color = "purple")
```


## Otro meme

Esta vez la imagen esta en internet

```{r}
meme(ruta_a_imagen_3, "SÍ q puedes!!!", "Tú puedes aprender R!!", 3.5, "green")
```

