R/oc_params.R

# 
# 
# #' @details Taken from this site on 2014-12-10 http://oceancolor.gsfc.nasa.gov/REPROCESSING/R2009/ocv6/
# #' 
# OCv6 <- structure(list(sensor = structure(c(6L, 2L, 5L, 6L, 3L, 3L, 7L, 
#                                     2L, 5L, 1L, 6L, 2L, 5L, 3L, 3L, 4L), .Label = c("CZCS", "MERIS", 
#                                                                                     "MODIS", "MODIS (500-m)", "OCTS", "SeaWiFS", "VIIRS"), class = "factor"), 
#                default = structure(c(2L, 2L, 2L, 1L, 1L, 2L, 2L, 1L, 1L, 
#                                      2L, 1L, 1L, 1L, 1L, 1L, 2L), .Label = c("N", "Y"), class = "factor"), 
#                blue = structure(c(3L, 3L, 4L, 2L, 2L, 2L, 1L, 2L, 2L, 5L, 
#                                   7L, 7L, 7L, 7L, 7L, 6L), .Label = c("443>486", "443>489", 
#                                                                       "443>489>510", "443>489>516", "443>520", "469", "489"), class = "factor"), 
#                green = structure(c(3L, 4L, 5L, 3L, 2L, 1L, 2L, 4L, 5L, 2L, 
#                                    3L, 4L, 5L, 2L, 1L, 3L), .Label = c("547", "550", "555", 
#                                                                        "560", "565"), class = "factor"), a0 = structure(c(13L, 12L, 
#                                                                                                                           14L, 10L, 6L, 6L, 2L, 11L, 5L, 15L, 9L, 4L, 3L, 7L, 8L, 1L
#                                                                        ), .Label = c("0.1464", "0.2228", "0.2236", "0.2389", "0.2399", 
#                                                                                      "0.2424", "0.2481", "0.2500", "0.2511", "0.2515", "0.2521", 
#                                                                                      "0.3255", "0.3272", "0.3325", "0.3330"), class = "factor"), 
#                a1 = structure(c(15L, 13L, 14L, 8L, 11L, 12L, 9L, 6L, 4L, 
#                                 16L, 5L, 3L, 2L, 7L, 10L, 1L), .Label = c("-1.7953", "-1.8296", 
#                                                                           "-1.9369", "-2.0825", "-2.0853", "-2.2146", "-2.2958", "-2.3798", 
#                                                                           "-2.4683", "-2.4752", "-2.5828", "-2.7423", "-2.7677", "-2.8278", 
#                                                                           "-2.9940", "-4.3770"), class = "factor"), a2 = structure(c(14L, 
#                                                                                                                                      13L, 15L, 6L, 9L, 11L, 7L, 5L, 8L, 16L, 4L, 10L, 12L, 2L, 
#                                                                                                                                      3L, 1L), .Label = c("0.9718", "1.4053", "1.4061", "1.5035", 
#                                                                                                                                                          "1.5193", "1.5823", "1.5867", "1.6126", "1.7057", "1.7627", 
#                                                                                                                                                          "1.8017", "1.9094", "2.4409", "2.7218", "3.0939", "7.6267"
#                                                                                                                                      ), class = "factor"), a3 = structure(c(8L, 7L, 9L, 3L, 1L, 
#                                                                                                                                                                             16L, 2L, 4L, 6L, 15L, 14L, 12L, 11L, 13L, 10L, 5L), .Label = c("-0.3415", 
#                                                                                                                                                                                                                                            "-0.4275", "-0.6372", "-0.7702", "-0.8319", "-1.0848", "-1.1288", 
#                                                                                                                                                                                                                                            "-1.2259", "-2.0917", "-2.8233", "-2.9481", "-3.0777", "-3.1299", 
#                                                                                                                                                                                                                                            "-3.1747", "-7.1457", "0.0015"), class = "factor"), a4 = structure(c(7L, 
#                                                                                                                                                                                                                                                                                                                 6L, 1L, 8L, 11L, 12L, 9L, 5L, 4L, 16L, 13L, 2L, 3L, 15L, 
#                                                                                                                                                                                                                                                                                                                 14L, 10L), .Label = c("-0.0257", "-0.1054", "-0.1718", "-0.2083", 
#                                                                                                                                                                                                                                                                                                                                       "-0.4291", "-0.4990", "-0.5683", "-0.5692", "-0.7768", "-0.8073", 
#                                                                                                                                                                                                                                                                                                                                       "-0.8818", "-1.2280", "0.3383", "0.5405", "0.6478", "1.6673"
#                                                                                                                                                                                                                                                                                                                 ), class = "factor")), .Names = c("sensor", "default", "blue", 
#                                                                                                                                                                                                                                                                                                                                                   "green", "a0", "a1", "a2", "a3", "a4"), row.names = c("OC4", 
#                                                                                                                                                                                                                                                                                                                                                                                                         "OC4E", "OC4O", "OC3S", "OC3M-551", "OC3M-547", "OC3V", "OC3E", 
#                                                                                                                                                                                                                                                                                                                                                                                                         "OC3O", "OC3C", "OC2S", "OC2E", "OC2O", "OC2M-551", "OC2M-547", 
#                                                                                                                                                                                                                                                                                                                                                                                                         "OC2M-HI"), class = "data.frame")
mdsumner/roc documentation built on May 22, 2019, 5:05 p.m.