search for: fri2

...; ) ? ## Conditions: I want to insert the images?given these conditions, and then center each image 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 <...