# DC circuits and power calculations Calculates and plots DC V-I response as well as transient response ```r 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) ``` ## Arguments - `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) ## Details Object x contains all the calculated values which can be passed to function ivplane to plot the graphs. ## Returns - **V**: Voltage - **I**: Current - **P**: Power - **txt**: labels - **Light**: Light levels from PVcell ## References 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. ## Author(s) Miguel F. Acevedo acevedo@unt.edu ## Note Functions used in Chapter 3 and Chapter 5 of Acevedo (2018) ## Examples ```r # 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) ```

functions.dc.power function