library(knitr)    # For knitting document and include_graphics function
#library(png)
myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_8_2", full.names = TRUE)
include_graphics(myimages[2])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_16_2", full.names = TRUE)
include_graphics(myimages[2])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_16_3", full.names = TRUE)
include_graphics(myimages[2])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_32_3", full.names = TRUE)
include_graphics(myimages[2])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_32_4", full.names = TRUE)
include_graphics(myimages[2])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_64_4", full.names = TRUE)
include_graphics(myimages[2])

library(knitr)    # For knitting document and include_graphics function
#library(png)
myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_8_2", full.names = TRUE)
include_graphics(myimages[1])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_16_2", full.names = TRUE)
include_graphics(myimages[1])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_16_3", full.names = TRUE)
include_graphics(myimages[1])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_32_3", full.names = TRUE)
include_graphics(myimages[1])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_32_4", full.names = TRUE)
include_graphics(myimages[1])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_64_4", full.names = TRUE)
include_graphics(myimages[1])

library(knitr)    # For knitting document and include_graphics function
#library(png)
myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_8_2", full.names = TRUE)
include_graphics(myimages[3])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_16_2", full.names = TRUE)
include_graphics(myimages[3])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_16_3", full.names = TRUE)
include_graphics(myimages[3])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_32_3", full.names = TRUE)
include_graphics(myimages[3])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_32_4", full.names = TRUE)
include_graphics(myimages[3])

myimages<-list.files("/home/boyazhang/repos/unifdist/code/images", pattern = "beta_para_map_64_4", full.names = TRUE)
include_graphics(myimages[3])