fitcurve: A fitcurve function

Description Usage Arguments Value Examples

Description

Fits the power curve with Weibull CDF, Logistic and user defined techniques

Usage

1
fitcurve(data, MethodPath, MethodName)

Arguments

data

as input data.frame with two columns, i.e., wind speed and wind power

MethodPath

as path of a code for user defined curve fitting technique

MethodName

as name of the user defined curve fitting technique

Value

fitted curves and corresponding discrete fitted values

Examples

1
2
3
4
5
data(pcurves)
s <- pcurves$Speed
p <- pcurves$`Nordex N90`
da <- data.frame(s,p)
fitcurve(da)

Example output

   Weibull CDF model
   -----------------
   P = 1 - exp[-(S/C)^k]
   where P -> Power and S -> Speed 

    Shape (k) = 4.242446 
    Scale (C) = 9.564993 
   ===================================

   Logistic Function model
   -----------------------
   P = phi1/(1+exp((phi2-S)/phi3))
   where P -> Power and S -> Speed 

    phi 1 = 2318.242 
    phi 2 = 8.658611 
    phi 3 = 1.366054 
   ===================================

$Speed
 [1]  1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25

$Power
 [1]    0    0    0   35  175  352  580  870 1237 1623 2012 2230 2300 2300 2300
[16] 2300 2300 2300 2300 2300 2300 2300 2300 2300 2300

$`Weibull CDF`
 [1]    0.0000    0.0000    0.0000   90.3871  175.0000  327.5161  563.9085
 [8]  882.3965 1253.7489 1623.0000 1929.1254 2134.6685 2242.6251 2285.2438
[15] 2297.3355 2299.6816 2299.9764 2299.9990 2300.0000 2300.0000 2300.0000
[22] 2300.0000 2300.0000 2300.0000 2300.0000

$`Logistic Function`
 [1]    0.00000    0.00000    0.00000   74.12834  148.99362  289.70750
 [7]  530.79747  884.98926 1303.20935 1686.50694 1964.36660 2133.40768
[13] 2225.51217 2272.70001 2296.11395 2307.54706 2313.08621 2315.75963
[19] 2317.04756 2317.66748 2317.96573 2318.10919 2318.17820 2318.21138
[25] 2318.22734

attr(,"class")
[1] "fitcurve"
attr(,"row.names")
 [1]  1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25

WindCurves documentation built on May 2, 2019, 2:06 a.m.