We will try our best to offer additional help for learning R in this forum. Questions and discussions are warmly welcome!
par(mar = rep(0, 4))
for (i in 1:360) {
plot(1, ann = F, type = "n", axes = F)
text(1, 1, "Welcome", srt = i,
col = rainbow(360)[i], cex = 7 * i/360)
Sys.sleep(0.01)
}