Создать GIF из файлов BMP - PullRequest
       63

Создать GIF из файлов BMP

0 голосов
/ 22 февраля 2020

Я новичок в R ...

Я создаю для l oop, который генерирует несколько испытаний наборов из десяти изображений в виде файлов BMP. Мне нужно сделать каждый набор из десяти изображений в виде gif-анимации, но я не могу понять, как это сделать. Я сохраняю все переменные в файле данных, который называется speedDT. Однако я не включил эту часть кода. Любая помощь будет замечательной!

xInt<-c(1, 1, 1, 1, 1, 1, 1, 1, 1) 
y<-c(1, 2, 3, 4, 5, 6, 7, 8, 9) 
velSpread<-c(10, 18, 27, 38, 42, 54, 60)

for(v in velSpread){

  xInt<-c(1, 1, 1, 1, 1, 1, 1, 1, 1) 
  vel<-sample(1:v, size=length(xInt), replace=FALSE) 
  velMean<-mean(vel)

for(frame in 1:15){

      bmp(file=paste("C:/Users/hello/Desktop/Ensemble Perception/Ensemble Perception and Motion/stimuli/","variabilitySpeed_", "_", frame,"_",velSpread, ".bmp",sep=""))

      plot(xInt, y, xlim=c(1,800), ylim=c(1,9), col="black", pch=19, ann=FALSE, xaxt="n", yaxt="n",bty="n")

      dev.off()

  for(i in 1:length(xInt)){

    xInt[i]=xInt[i] + vel[i]

      }
   }
}
...