print.ECGr {ECG} | R Documentation |
Displays the content of a ECGr object.
## S3 method for class 'ECGr'
print(x, signifDigits=x$input$signifDigits,
alpha = x$input$alpha, verbose=FALSE, ...)
x |
an ECGr object. |
signifDigits |
a numeric value for the number of significant digits. |
alpha |
a probability value taken as the significance level for building a
symmetric confidence interval assuming a t distribution for |
verbose |
a boolean, if FALSE the description of the form |
... |
additional parameters |
No return value. Used for textual display purposes.
H. Gasca-Aragon
require(ECG)
N<- 1000
set.seed(12345)
d1<- 1-sin(seq(1:(5/2*N))/N*pi-pi*3/4)+rnorm(5/2*N, 0, 0.01)
d2<- 1-sin(seq(1:(5/2*N))/N*pi-pi*3/4)+rnorm(5/2*N, 0, 0.01)
dat<- data.frame(x=1:length(d1),
y1=100*(d1-min(d1))/(max(d1)-min(d1)),
y2=100*(d2-min(d2))/(max(d2)-min(d2))
)
ECGres<- ECGr(dat, columns=c(2,3))
ECGres
print(ECGres)
CGres<- CGr(dat, columns=c(2,3))
CGres
print(CGres)