DC circuits {renpow} | R Documentation |
Calculates and plots DC V-I response as well as transient response
resistor(V,R) ivplane(x, x0 = FALSE, y0 = FALSE) diode(V) vsource(Voc,Rs) isource(Isc,Rp) PVcell(x.PVcell) PVcell.plot(y.PVcell) eff.pow(x.eff.pow) transient(ys, tau, ylabel, yslabel) fuel.cell(x.fcell)
V |
Voltage |
R |
Resistance |
x |
Result of function resistor, diode, vsource, or isource |
x0 |
Logical argument to plot2axis |
y0 |
Logical argument to plot2axis |
Voc |
Open circuit voltage |
Rs |
Series resistance |
Isc |
Short circuit current |
Rp |
Parallel resistance |
x.PVcell |
list(I0.A, Isc.A, Area, Rs, Rp, Light) |
y.PVcell |
output of PVcell |
x.eff.pow |
list(Rth,Voc) |
ys |
Source for transient calculation |
tau |
Time constant |
ylabel |
y axis label for transient plots |
yslabel |
Source label for transient plots |
x.fcell |
list(area.cm2,Rload.ohm) |
Object x contains all the calculated values which can be passed to function ivplane to plot the graphs.
V |
Voltage |
I |
Current |
P |
Power |
txt |
labels |
Light |
Light levels from PVcell |
Functions used in Chapter 3 and Chapter 5 of Acevedo (2018)
Miguel F. Acevedo acevedo@unt.edu
Acevedo, M.F. 2018. Introduction to Renewable Electric Power Systems and the Environment with R. Boca Raton, FL: CRC Press. (ISBN 9781138197343)
Irwin, J.D. and R.M. Nelms. 2011. Basic Engineering Circuit Analysis. 11th edition. 2011: Wiley.
# from Chapter 3 # resistors V <- seq(-0.2,1,0.01) # volts x <- resistor(V,R=1) ivplane(x) # diode V <- seq(-0.1,0.6,0.01) # volts x <- diode(V) ivplane(x) # voltage source x <- vsource(Voc=24,Rs=1) ivplane(x) # current source x <- isource(Isc=20,Rp=1) ivplane(x) # PV cell x <- list(I0.A=1, Isc.A=40, Area=100, Rs=0.05, Rp=1, Light=1) # units: I0.A pA/cm2 Isc.A mA/cm2 Area cm2 Rs ohm Rp ohm X <- PVcell(x) ivplane(X,x0=TRUE,y0=TRUE) # efficiency of power transfer x <- list(Rth=1,Voc=24) eff.pow(x) # from Chapter 5 # RC circuit transient R=0.2;C=1 # Mohm and uF transient(ys=12,tau=R*C,ylabel="Vc(t) [V]",yslabel="Vs [V]") # RL circuit transient R=20;L=1; # kohm and mH transient(ys=12/R,tau=L/R,ylabel="iL(t) [A]",yslabel="Vs/R [V]") # Chapter 6 fuel cells x <- list(area.cm2=15,Rload.ohm=NA) fuel.cell(x) x <- list(area.cm2=15,Rload.ohm=0.5) fuel.cell(x)