# NOT RUN {
mytext=c("AAA", "BBB", "CCC")
color1=c("orange", "red", "white")
color2=c("black", "blue", "green")
g1=textgif(mytext, text_color=color1, bg_color=color2,
width=180, height=120, fps=2, family="serif")
# }
Run the code above in your browser using DataLab