search for: fri3

...age for h== 0 (that is inserting only one image for midnight, otherwise I'd get 24 images together) ? fri1 <- function(x){ plot( ifelse( I2$image == "f" && I2$h == 0, f, NA )) } fri2 <- function(x){ plot( ifelse( I2$image == "n" && I2$h == 0, n, NA )) } fri3 <- function(x){ plot( ifelse( I2$image == "2c" && I2$h == 0, c2, NA )) } fri4 <- function(x){ plot( ifelse( I2$image == "2d" && I2$h == 0, d2, NA )) } fri5 <- function(x){ plot( ifelse( I2$image == "3c" && I2$h == 0, c3, NA )) } fri6 &l...