Displaying 1 result from an estimated 1 matches for "yourlogo".
2005 Oct 06
3
playing with R: make a animated GIF file...
...load the GiF files in R and use the caTools package to make a
animated GIF.
------------------
############################ the code
######## reverse the STRING
strReverse <- function(x) sapply(lapply(strsplit(x, NULL), rev), paste,
collapse="")
######## logotype to animate
yourLogo = "Is Nice to play with R-package "
logoWidth = 1.5
logoHeight = 2.5
L = nchar(yourLogo)
TrigSplit = 360 / L
yourLogo = strReverse(yourLogo)
posx = numeric(L)
posy = numeric(L)
for( i in 0:L){
posx[i] = logoHeight * sin(i * TrigSplit * pi / 180)
posy[i] = logoWidth * cos(i...