| Title: | Tool to Fit Wind Turbine Power Curves |
|---|---|
| Description: | Provides a tool to fit and compare the wind turbine power curves with successful curve fitting techniques. Facilitates to examine and compare the performance of a user-defined power curve fitting techniques. Also, provide features to generate power curve discrete points from a graphical power curves. Data on the power curves of the wind turbine from major manufacturers are provided. |
| Authors: | Neeraj Bokde, Andres Feijoo |
| Maintainer: | Neeraj Bokde <[email protected]> |
| License: | GPL |
| Version: | 0.2 |
| Built: | 2024-10-29 05:01:33 UTC |
| Source: | https://github.com/cran/WindCurves |
Fits the power curve with Weibull CDF, Logistic and user defined techniques
fitcurve(data, MethodPath, MethodName)fitcurve(data, MethodPath, MethodName)
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 |
fitted curves and corresponding discrete fitted values
data(pcurves) s <- pcurves$Speed p <- pcurves$`Nordex N90` da <- data.frame(s,p) fitcurve(da)data(pcurves) s <- pcurves$Speed p <- pcurves$`Nordex N90` da <- data.frame(s,p) fitcurve(da)
A function to capture Speed Vs Power discrete points from power curve image
img2points(imagePath, n)img2points(imagePath, n)
imagePath |
as Path of a power curve image |
n |
as number of points to be captured from the curve image (default value is 15) |
data.frame with two columns, i.e., wind speed and wind power
## Not run: # to import image from system 'extdata' folder. # user can directly specify the path of the image in 'img2points()'. imagePath <- system.file("extdata","powercurve.jpeg", package="WindCurves") img2points(imagePath) ## End(Not run)## Not run: # to import image from system 'extdata' folder. # user can directly specify the path of the image in 'img2points()'. imagePath <- system.file("extdata","powercurve.jpeg", package="WindCurves") img2points(imagePath) ## End(Not run)
Data on the power curves of wind turbine from four major manufacturers: Siemens, Vestas, REpower and Nordex. Represents wind turbine power output in 'kW' against wind speed in 'metres per second'.
data(pcurves)data(pcurves)
An object of class data.frame with 25 rows and 7 columns.
Iain Staffell (2012) https://goo.gl/tD2JW6
data(pcurves) v <- pcurves$`Vestad V80`data(pcurves) v <- pcurves$`Vestad V80`
A function to plot the curves fitted with fitcurve() function
## S3 method for class 'fitcurve' plot(x, ...)## S3 method for class 'fitcurve' plot(x, ...)
x |
is object returned by fitcurve() function |
... |
Additional graphical parameters given to plot function. |
Plot the curves fitted with fitcurve() function
s <- pcurves$Speed p <- pcurves$`Nordex N90` da <- data.frame(s,p) x <- fitcurve(da) plot(x)s <- pcurves$Speed p <- pcurves$`Nordex N90` da <- data.frame(s,p) x <- fitcurve(da) plot(x)
Compares the performance of curve fitting techniques fitted in fitcurve() function
validate.curve(x, MethodPath, MethodName)validate.curve(x, MethodPath, MethodName)
x |
is object returned by fitcurve() function |
MethodPath |
as path of a code for user defined error measure technique |
MethodName |
as name of the user defined error measure technique |
A comparison matrix in terms of various error measures.
s <- pcurves$Speed p <- pcurves$`Nordex N90` da <- data.frame(s,p) x <- fitcurve(da) validate.curve(x)s <- pcurves$Speed p <- pcurves$`Nordex N90` da <- data.frame(s,p) x <- fitcurve(da) validate.curve(x)