La création d'un Film à partir d'une Série de Parcelles dans la R

Est-il un moyen facile de créer un "film" en reliant plusieurs parcelles, dans R?

InformationsquelleAutor Ryan R. Rosario | 2009-08-19
  1. 40

    Voici une méthode que j'ai trouvé à l'aide de la R de l'aide:

    Pour créer l'image individuelle des cadres:

    jpeg("/tmp/foo%02d.jpg")
for (i in 1:5) {
  my.plot(i)
}
dev.off()

    Pour en faire un film, tout d'abord installer ImageMagick.
    Puis d'appeler la fonction suivante (qui s'appelle "convertir", une partie de ImageMagick je suppose):

    make.mov <- function(){
     unlink("plot.mpg")
     system("convert -delay 0.5 plot*.jpg plot.mpg")
}

    Ou essayez d'utiliser la ffmpeg fonction comme décrit dans cette l'article (j'ai trouvé cela donne nettoyeur de résultats):
    ffmpeg -r 25 -qscale 2 -je tmp/foo%02d.jpg de sortie.mp4

    Peut exiger un peu de bricolage, mais cela semble assez simple, une fois que tout a été installé.

    Bien sûr, partout où vous voyez "jpg" ou "jpeg", vous pouvez remplacer le format GIF ou PNG pour répondre à votre fantaisie.

    • Vous pouvez même garder jpeg() et dev.off() en dehors de la boucle -- si vous utilisez un nom de fichier comme par exemple jpeg("/tmp/foo%02d.png"), le R il suffit de créer de nouveaux fichiers pendant votre boucle. Pas besoin de vous pour calculer le nom de fichier. Il est encore plus facile.
    • Vous devriez faire de Dirk correctif et puis accepter votre propre réponse. La bonne solution.
    • utile ... mais trouver qu'il est difficile de comprendre d'où l' .mpg fichier est enregistré après l'exécution de la fonction " faire.mov' dans R? Je suis en train de travailler à l'intérieur de R studio sur une plate-forme mac.
    • quand je lance system("convert -delay 80 *.png example_1.gif") j'obtiens une erreur Invalid Parameter - 80. Je précise ani.options( convert = shQuote('C:/Program Files/ImageMagick-7.0.5-Q16/convert.exe') # convert = shQuote('C:/Windows/System32/convert.exe') ). Des idées ?
    • lien de l'article n'existe plus
    InformationsquelleAutor Ryan R. Rosario
  2. 14

    Jeter un oeil à la animation package créé par Yihui Xif Au Catalogue ou la EBImage bioconductor paquet (?animer).

    • Intéressante remarque, je viens de regarder à l' animation documentation du paquetage et a remarqué qu'il exige ImageMagick à être installé.
    InformationsquelleAutor Paolo
  3. 10

    Je pense que vous pouvez le faire aussi avec la write.gif fonction dans le caTools de la bibliothèque. Vous devez obtenir votre graphique dans un multi-trame d'image d'abord. Je ne suis pas sûr de la façon de le faire. N'importe qui? Bueller?

    L'exemple classique d'un GIF animé est ce code que je n'ai pas écris, mais je n'ai blog sur il y a quelques temps:

    library(fields) # for tim.colors
library(caTools) # for write.gif
m = 400 # grid size
C = complex( real=rep(seq(-1.8,0.6, length.out=m), each=m ), imag=rep(seq(-1.2,1.2, length.out=m), m ) )
C = matrix(C,m,m)

Z = 0
X = array(0, c(m,m,20))
for (k in 1:20) {
Z = Z^2+C
X[,,k] = exp(-abs(Z))
}

image(X[,,k], col=tim.colors(256)) # show final image in R
write.gif(X, 'Mandelbrot.gif', col=tim.colors(256), delay=100)

    Code de crédit va à Jarek Tuszynski, PhD.

    • J'obtiens une erreur sur la dernière ligne: "Error: unexpected entrée dans "write.gif(X, “" "
    • Pour l'erreur ci-dessus - changer les guillemets autour de Mandelbrot.gif dans la dernière ligne de code à la régulière guillemets (c'est à dire supprimer et type de nouvelles marques de devis dans votre script)
    InformationsquelleAutor JD Long
  4. 2

    Si vous enveloppez de votre script R au sein d'un grand Perl/Python/etc. script, vous pouvez coudre des graphiques avec votre favori de la ligne de commande de l'image de couture de l'outil.

    Pour exécuter votre script R avec un script, utilisez la R CMD BATCH méthode.

    • Pourquoi avez-vous besoin d'une autre langue à utiliser un outil en ligne de commande?
    • Bien d'où besoin d'un Perl/Python script? Aussi, regardez Rscript (et littler) que de meilleures alternatives à 'R CMD BATCH'.
    • Vous n'avez pas besoin d'une autre langue. Vous pouvez utiliser un shell comme bash. Tout ce que vous voulez. Il ya beaucoup d'options. J'utilise R CMD BATCH car il est plus ou moins universel sur l'ensemble des plateformes.
    • Je trouve qu'il est assez facile une fois que ImageMagick et ffmpeg sont installés.
    InformationsquelleAutor Alex Reynolds
  5. 0

    Je ne suis pas sûr que c'est possible dans R. j'ai fait un projet une fois que lorsque les points de données de la recherche ont été exportées vers une base de données MySQL et un Flex/Flash application ramassé ces points de données et a donné animé visualisations..

    • Vous n'avez pas besoin d'une base de données. Dans une boucle, enregistrer toutes vos images. Ensuite, utilisez un outil en ligne de commande à les réunir; imagemagick est une possibilité.
    • Oui, c'était le moyen le plus facile. Je suppose en raison d'OS de la modularité, c'est vraiment pas possible de le faire dans R, sauf si R est compilé avec une bibliothèque spécialisée ou tel.
    • C'est une habile technique, Srirangan. J'ai appris il y a plusieurs années que, lorsque quelqu'un dit "c'est pas possible", ils veulent dire "je ne sais pas comment faire". L'astuce de la technique, c'est que dans un forum comme SI, quelqu'un est lié à vous dire comment le faire. Je ne suis pas sarcastique, par la manière. Je pense VRAIMENT que c'est une bonne technique, et je vais l'essayer. Grâce Srirangan.
    • Assurez-vous. Mais c'est essentiellement la même chose que j'ai dit. R ne peut pas le faire et que vous êtes en fonction sur une application externe pour le faire. Je identiée le cas où j'avais utilisé Flex/ActionScript, Ryan a recommandé l'utilisation de ImageMagick, mais à la fin vous êtes dépendant d'un app externe. C'était mon point. J'ai été nulle part en prétendant que mon chemin était la seule façon de le faire. 😉
    • En invoquant à la fois une base de données et le Flash est un double overkill!
    InformationsquelleAutor Sri
  6. 0

    J'ai fait quelques films à l'aide de XNview (gratuit visionneuse graphique) Créer la fonction Diaporama. Je voulais montrer les tendances à travers le temps avec de données géographiques, de sorte que je viens de créer une série de parcelles, nommés dans l'ordre, [coller (le) est votre ami pour toutes sortes de nommage calistethics] ensuite chargé dans XNviews diaporama de dialogue et de quelques minuterie variables, le tour est joué. A pris que 5 minutes pour apprendre comment le faire et de produire certains exécutable graphiques.

    InformationsquelleAutor kpierce8
  7. 0

    Voici un exemple complet sur la fabrication d'un GIF animé "film" à partir d'un HDF5 fichier. Les données devraient être un HDF Dataset d'un 3 dimensions, tableau [Nframes][Nrows][Ncolumns].

    #
# be sure to be run as Administrator to install new packages
#
source("http://bioconductor.org/biocLite.R")
biocLite("rhdf5")
install.packages('caTools')
install.packages('fields')

library(caTools)
library(fields)
library(rhdf5)

x = h5read(file="mydata.h5",name="/Images")
write.gif(x,"movie1.gif",col=rainbow,delay=10,flip=TRUE)
    InformationsquelleAutor Mark Lakata