Workaround ugly border in vignette

ropensci · Aug 21, 2017 · 9ef7d35 · 9ef7d35
1 parent 35eb284
commit 9ef7d35
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 0 deletions.
diff --git a/inst/doc/intro.R b/inst/doc/intro.R
@@ -225,6 +225,7 @@ out <- lapply(datalist, function(data){
   print(p)
 })
 dev.off()
+img <- image_background(image_trim(img), 'white')
 animation <- image_animate(img, fps = 2)
 print(animation)
 

diff --git a/inst/doc/intro.Rmd b/inst/doc/intro.Rmd
@@ -464,6 +464,7 @@ out <- lapply(datalist, function(data){
   print(p)
 })
 dev.off()
+img <- image_background(image_trim(img), 'white')
 animation <- image_animate(img, fps = 2)
 print(animation)
 ```

diff --git a/vignettes/intro.Rmd b/vignettes/intro.Rmd
@@ -464,6 +464,7 @@ out <- lapply(datalist, function(data){
   print(p)
 })
 dev.off()
+img <- image_background(image_trim(img), 'white')
 animation <- image_animate(img, fps = 2)
 print(animation)
 ```