Objective

Here we show how the model perform on different sites. We text for 2 years training 2012, 2013 and test 2014. The target and training is from the chosen station. All the models only usar solar radiation.

alt text

#Defines how to discretize each weather variable
model[["discretize"]] <- list()
#Precipitation
model[["discretize"]][["PREC"]][["method"]] <- "binning"
model[["discretize"]][["PREC"]][["ncentroids"]] <- 5
#Solar
model[["discretize"]][["SOLR"]][["method"]] <- "kmeans"
model[["discretize"]][["SOLR"]][["ncentroids"]] <- 5
#Humidity
model[["discretize"]][["RELH"]][["method"]] <- "kmeans"
model[["discretize"]][["RELH"]][["ncentroids"]] <- 5
#Dew Point
model[["discretize"]][["DWPF"]][["method"]] <- "kmeans"
model[["discretize"]][["DWPF"]][["ncentroids"]] <- 5
#Wind Speed
model[["discretize"]][["SKNT"]][["method"]] <- "kmeans"
model[["discretize"]][["SKNT"]][["ncentroids"]] <- 5
#Temperature
model[["discretize"]][["TMPF"]][["method"]] <- "kmeans"
model[["discretize"]][["TMPF"]][["ncentroids"]] <- 5

SCBH1 (Center)

formulas <- c(
                "SCBH1.SOLR_Daym0|SCBH1.SOLR_Daym1",
                "SCBH1.SOLR_Daym0|SCBH1.SOLR_Daym1,SCBH1.SOLR_Daym2",
                "SCBH1.SOLR_Daym0|SCBH1.SOLR_Daym1,SCBH1.SOLR_Daym2,SCBH1.SOLR_Daym3",
                "SCBH1.SOLR_Daym0|SCBH1.SOLR_Daym1,SCBH1.SOLR_Daym2,SCBH1.SOLR_Daym3,SCBH1.SOLR_Daym4",
                "SCBH1.SOLR_Daym0|SCBH1.SOLR_Daym1,SCBH1.SOLR_Daym2,SCBH1.SOLR_Daym3,SCBH1.SOLR_Daym4,SCBH1.SOLR_Daym5",
                "SCBH1.SOLR_Daym0|SCBH1.SOLR_Daym1,SCBH1.SOLR_Daym2,SCBH1.SOLR_Daym3,SCBH1.SOLR_Daym4,SCBH1.SOLR_Daym5,SCBH1.SOLR_Daym6",
                "SCBH1.SOLR_Daym0|SCBH1.SOLR_Daym1,SCBH1.SOLR_Daym2,SCBH1.SOLR_Daym3,SCBH1.SOLR_Daym4,SCBH1.SOLR_Daym5,SCBH1.SOLR_Daym6,SCBH1.SOLR_Daym7"
            )

2	3	4	5	6	7	8
1657.286	1761.834	1821.736	2558.861	2330.615	2710.929	1767.8

KKRH1 (Far West)

formulas <- c(
                "KKRH1.SOLR_Daym0|KKRH1.SOLR_Daym1",
                "KKRH1.SOLR_Daym0|KKRH1.SOLR_Daym1,KKRH1.SOLR_Daym2",
                "KKRH1.SOLR_Daym0|KKRH1.SOLR_Daym1,KKRH1.SOLR_Daym2,KKRH1.SOLR_Daym3",
                "KKRH1.SOLR_Daym0|KKRH1.SOLR_Daym1,KKRH1.SOLR_Daym2,KKRH1.SOLR_Daym3,KKRH1.SOLR_Daym4",
                "KKRH1.SOLR_Daym0|KKRH1.SOLR_Daym1,KKRH1.SOLR_Daym2,KKRH1.SOLR_Daym3,KKRH1.SOLR_Daym4,KKRH1.SOLR_Daym5",
                "KKRH1.SOLR_Daym0|KKRH1.SOLR_Daym1,KKRH1.SOLR_Daym2,KKRH1.SOLR_Daym3,KKRH1.SOLR_Daym4,KKRH1.SOLR_Daym5,KKRH1.SOLR_Daym6",
                "KKRH1.SOLR_Daym0|KKRH1.SOLR_Daym1,KKRH1.SOLR_Daym2,KKRH1.SOLR_Daym3,KKRH1.SOLR_Daym4,KKRH1.SOLR_Daym5,KKRH1.SOLR_Daym6,KKRH1.SOLR_Daym7"
            )

2	3	4	5	6	7	8
1840.374	1806.003	2074.343	2046.561	2089.584	2417.467	2088.709

PLHH1 (South)

formulas <- c(
                "PLHH1.SOLR_Daym0|PLHH1.SOLR_Daym1",
                "PLHH1.SOLR_Daym0|PLHH1.SOLR_Daym1,PLHH1.SOLR_Daym2",
                "PLHH1.SOLR_Daym0|PLHH1.SOLR_Daym1,PLHH1.SOLR_Daym2,PLHH1.SOLR_Daym3",
                "PLHH1.SOLR_Daym0|PLHH1.SOLR_Daym1,PLHH1.SOLR_Daym2,PLHH1.SOLR_Daym3,PLHH1.SOLR_Daym4",
                "PLHH1.SOLR_Daym0|PLHH1.SOLR_Daym1,PLHH1.SOLR_Daym2,PLHH1.SOLR_Daym3,PLHH1.SOLR_Daym4,PLHH1.SOLR_Daym5",
                "PLHH1.SOLR_Daym0|PLHH1.SOLR_Daym1,PLHH1.SOLR_Daym2,PLHH1.SOLR_Daym3,PLHH1.SOLR_Daym4,PLHH1.SOLR_Daym5,PLHH1.SOLR_Daym6",
                "PLHH1.SOLR_Daym0|PLHH1.SOLR_Daym1,PLHH1.SOLR_Daym2,PLHH1.SOLR_Daym3,PLHH1.SOLR_Daym4,PLHH1.SOLR_Daym5,PLHH1.SOLR_Daym6,PLHH1.SOLR_Daym7"
            )

2	3	4	5	6	7	8
1686.188	1658.856	1883.046	1934.099	1887.014	2318.074	1850.683

OFRH1 (East)

formulas <- c(
                "OFRH1.SOLR_Daym0|OFRH1.SOLR_Daym1",
                "OFRH1.SOLR_Daym0|OFRH1.SOLR_Daym1,OFRH1.SOLR_Daym2",
                "OFRH1.SOLR_Daym0|OFRH1.SOLR_Daym1,OFRH1.SOLR_Daym2,OFRH1.SOLR_Daym3",
                "OFRH1.SOLR_Daym0|OFRH1.SOLR_Daym1,OFRH1.SOLR_Daym2,OFRH1.SOLR_Daym3,OFRH1.SOLR_Daym4",
                "OFRH1.SOLR_Daym0|OFRH1.SOLR_Daym1,OFRH1.SOLR_Daym2,OFRH1.SOLR_Daym3,OFRH1.SOLR_Daym4,OFRH1.SOLR_Daym5",
                "OFRH1.SOLR_Daym0|OFRH1.SOLR_Daym1,OFRH1.SOLR_Daym2,OFRH1.SOLR_Daym3,OFRH1.SOLR_Daym4,OFRH1.SOLR_Daym5,OFRH1.SOLR_Daym6",
                "OFRH1.SOLR_Daym0|OFRH1.SOLR_Daym1,OFRH1.SOLR_Daym2,OFRH1.SOLR_Daym3,OFRH1.SOLR_Daym4,OFRH1.SOLR_Daym5,OFRH1.SOLR_Daym6,OFRH1.SOLR_Daym7"
            )

2	3	4	5	6	7	8
2134.253	1525.117	1996.335	1742.694	1429.783	2472.649	2319.698

KTAH1 (North)

formulas <- c(
                "KTAH1.SOLR_Daym0|KTAH1.SOLR_Daym1",
                "KTAH1.SOLR_Daym0|KTAH1.SOLR_Daym1,KTAH1.SOLR_Daym2",
                "KTAH1.SOLR_Daym0|KTAH1.SOLR_Daym1,KTAH1.SOLR_Daym2,KTAH1.SOLR_Daym3",
                "KTAH1.SOLR_Daym0|KTAH1.SOLR_Daym1,KTAH1.SOLR_Daym2,KTAH1.SOLR_Daym3,KTAH1.SOLR_Daym4",
                "KTAH1.SOLR_Daym0|KTAH1.SOLR_Daym1,KTAH1.SOLR_Daym2,KTAH1.SOLR_Daym3,KTAH1.SOLR_Daym4,KTAH1.SOLR_Daym5",
                "KTAH1.SOLR_Daym0|KTAH1.SOLR_Daym1,KTAH1.SOLR_Daym2,KTAH1.SOLR_Daym3,KTAH1.SOLR_Daym4,KTAH1.SOLR_Daym5,KTAH1.SOLR_Daym6",
                "KTAH1.SOLR_Daym0|KTAH1.SOLR_Daym1,KTAH1.SOLR_Daym2,KTAH1.SOLR_Daym3,KTAH1.SOLR_Daym4,KTAH1.SOLR_Daym5,KTAH1.SOLR_Daym6,KTAH1.SOLR_Daym7"
            )

2	3	4	5	6	7	8
1470.687	1585.099	1643.633	2172.368	2076.812	1753.194	1828.817

Feature Probability Model Paper Review 2

Carlos V. A. Silva