body {
  background-color: #f5f5f5;
  font-family: Arial, sans-serif;
}

h2 {
  color: #cc6600;
  border-bottom: 2px solid #cc6600;
}

img {
  border: 3px solid black;
  border-radius: 10px;
}

p {
  color: #333333;
}

Project requirements

Here is a screenshot of my Project1 folder in RStudio.

My GitHub stats220 repo

Inspo meme

The inspo meme has a simple and clear design. It uses a poor cat image and short text to create humour. The key design components are the facial expression, the caption placement, and the contrast between the image and the text.

My meme

I changed the text from the inspo meme to make it more personal and relatable. I kept the main image style but created a new caption to match my own idea. I made these changes because I wanted the meme to feel more original and more humorous by my own idea.

My animated meme

Creativity

This project demonstrates creativity because I changed the meme caption based on my own everyday experience. Instead of copying the original joke, I rewrote the text to make it more relevant to coding and student life, which made the meme feel more personal and original. I also added extra CSS to improve the appearance of the HTML report. In addition to changing the background, headings, and images, I also changed the paragraph text colour. This helped make the report clearer and more visually appealing. ## Learning reflection

It was important for me to learn that I could create my own GIF simply by making four new frames. I have always been interested in GIFs, so this project made me feel that I could create them more easily in the future. I also found it interesting that different languages such as R, CSS, and HTML can work together to produce one final result. This helped me understand that creating a webpage is not just about writing one type of code, but about combining different technologies. In the future, I would like to learn more about CSS so I can make webpages look more attractive. I also want to explore how to create images and animations with R. In addition, I am excited to learn data visualisation, which is one of the main features of R.

Appendix

Do not change, edit, or remove the R chunk included below.

If you are working within RStudio and within your Project1 RStudio project (check the top right-hand corner says “Project1”), then the code from the meme.R script will be displayed below.

This code needs to be visible for your project to be marked appropriately, as some of the criteria are based on this code being submitted.

library(magick)

# read the original meme image
img <- image_read("inspo_meme.png")

meme <- img %>%
  image_annotate(
    "POV: YOU SAY YOU CAN FIX THE BUG",
    size = 24,
    color = "black",
    gravity = "north",
    location = "+0+200"
  ) %>%
  image_annotate(
    "BUT YOU JUST HOLD THE FLASHLIGHT",
    size = 24,
    color = "black",
    gravity = "south",
    location = "+0+80"
  )

meme %>% image_write("my_meme.png")

# create different frames for animation

frame1 <- img %>%
  image_annotate(
    "ME AFTER FIXING ONE ERROR",
    size = 24,
    color = "black",
    gravity = "north",
    location = "+0+200"
  )

frame2 <- img %>%
  image_annotate(
    "WHEN TWO MORE APPEAR",
    size = 24,
    color = "black",
    gravity = "north",
    location = "+0+200"
  )

frame3 <- img %>%
  image_annotate(
    "WHEN FIVE MORE APPEAR",
    size = 24,
    color = "black",
    gravity = "north",
    location = "+0+200"
  )

frame4 <- img %>%
  image_annotate(
    "WHY IS THIS HAPPENING",
    size = 24,
    color = "black",
    gravity = "north",
    location = "+0+200"
  )

# combine frames into animation
animation <- c(frame1, frame2, frame3, frame4) %>%
  image_animate(fps = 1)

# save animated meme
animation %>% image_write("my_animated_meme.gif")