Displaying 1 result from an estimated 1 matches for "fun_pca_vector_movie_plot".
2004 Nov 14
2
Exporting to file: passing source name to file name in loop
...de. I am wishing to create a separate
.png file for every image created, each of them having a sequential
filename ie "sourcefile_index.png" so that I can create a movie from
them.
Please could someone tell me where I am going wrong?
the following code works fine and outputs to screen:
fun_pca_vector_movie_plot<-function(x,y,z,t){
zz=seq(1,(nrow(x)-t),by=t);jj=seq(t+1,(nrow(x)),by=t)
for(i in seq(along=zz)){
pca<-prcomp(x[zz[i]:jj[i],], retx=T, center=T,scale=T)
{
par(mfrow=c(1,z))
for(i in 1:z){
image(east,north,t(map.matrix),col=my.colors,axes=T,
xlab=...