Title: | Interlaboratory Study |
---|---|
Description: | It performs interlaboratory studies (ILS) to detect those laboratories that provide non-consistent results when comparing to others. It permits to work simultaneously with various testing materials, from standard univariate, and functional data analysis (FDA) perspectives. The univariate approach based on ASTM E691-08 consist of estimating the Mandel's h and k statistics to identify those laboratories that provide more significant different results, testing also the presence of outliers by Cochran and Grubbs tests, Analysis of variance (ANOVA) techniques are provided (F and Tuckey tests) to test differences in means corresponding to different laboratories per each material. Taking into account the functional nature of data retrieved in analytical chemistry, applied physics and engineering (spectra, thermograms, etc.). ILS package provides a FDA approach for finding the Mandel's k and h statistics distribution by smoothing bootstrap resampling. |
Authors: | Miguel Flores [aut, cre], Ruben Fernandez [aut], Salvador Naya [aut], Javier Tarrio-Saavedra [aut] |
Maintainer: | Miguel Flores <[email protected]> |
License: | GPL (>= 2) |
Version: | 0.2 |
Built: | 2024-11-06 03:42:31 UTC |
Source: | https://github.com/mflores72000/ils |
data.bootstrap
provides bootstrap samples for functional data.
boot.sim.set(x, smo = 0.05)
boot.sim.set(x, smo = 0.05)
x |
An object of classs |
smo |
The smoothing parameter for the bootstrap samples. |
Function to estimate the Cochran test statistic.
cochran.test(x, ...) ## Default S3 method: cochran.test( x, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL, alpha = 0.05, ... ) ## S3 method for class 'lab.qcdata' cochran.test(x, alpha = 0.05, ...)
cochran.test(x, ...) ## Default S3 method: cochran.test( x, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL, alpha = 0.05, ... ) ## S3 method for class 'lab.qcdata' cochran.test(x, alpha = 0.05, ...)
x |
An object of class |
... |
Other arguments passed to or from methods. |
var.index |
A scalar with the column number corresponding to the observed variable (the critical to quality variable). Alternativelly can be a string with the name of the quality variable. |
replicate.index |
A scalar with the column number corresponding to the index each replicate. |
material.index |
A scalar corresponding to the replicated number. |
laboratory.index |
A scalar that defines the index number of each laboratory. |
data.name |
A string specifying the name of the variable which appears on the plots. If name is not provided, it is taken from the object given as data. |
alpha |
The significance level (0.05 by default) |
Wilrich Peter-T. (2013), Critical values of mandel's h and k, the grubbs and the Cochran test statistic. Asta-Advances in Statistical Analysis, 97(1):1-10.
ASTM E 691 (1999), Standard practice for conducting an interlaboratory study to determine the precision of a test method. American Society for Testing and Materials. West Conshohocken, PA, USA.
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) cochran.test(Glucose.qcdata)
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) cochran.test(Glucose.qcdata)
90 samples of calcium oxalate were analyzed by differential scanning calorimetry technique (DSC), obtaining 90 DSC curves showing from an SDT device the difference of heat between a sample and an oxalate reference value depending on the temperature that the samples are heated at a constant temperature rate. The data set consists of 15 TG curves of 1000 observations from each of the 6 laboratories. Laboratory 2 to Laboratory 4 uses the same simultaneous SDT analyzer in similar conditions, Laboratory 6 uses a simultaneous SDT analyzer with an old calibration, and Laboratory 7 uses a simultaneous SDT analyzer with a calibration (2 degrees Celsius displaced from the zinc melting point).
5 x 1000 x 6 dimension array, where each matrix consists of the 15 DSC curves obtained by testing 15 different oxalate samples, and evaluated at 1000 different temperature values. These 15 curves were obtained for each of the 6 laboratories that performed the experiments.
Differential Scanning Calorimetry curves.
Naya, S., Tarrio-Saavedra. J., Lopez- Beceiro, J., Francisco Fernandez, M., Flores, M. and Artiaga, R. (2014), "Statistical functional approach for interlaboratory studies with thermal data". Journal of Thermal Analysis and Calorimetry, 118,1229-1243.
library(ILS) data(DSC) summary(DSC)
library(ILS) data(DSC) summary(DSC)
Central and dispersion measures for functional data.
func.ils.formula(formula, data = NULL, drop = FALSE, func = func.mean)
func.ils.formula(formula, data = NULL, drop = FALSE, func = func.mean)
formula |
A formula, such as y ~ group, where y is a fdata object. to be split into groups according to the grouping variable group (usually a factor). |
data |
List that containing the variables in the formula. The item called "df" is a data frame with the grouping variable. The item called "y" is a fdata object. |
drop |
Logical indicating if levels that do not occur should be dropped (if f is a factor or a list). |
func |
Measures for functional data. |
Dataset corresponding to serum glucose (measurements of glucose concentration in blood used to control diabetes) testing. Eight laboratories conducted tests to five different blood samples tagged with different references, ranging them from low sugar content to very high. Three replicates were obtained for each sample. It is retrieved from ASTM E 691 standard.
A data frame with 120 observations composed of the following 4 variables:
Glucose content in Serum.
Number of glucose measurement corresponding to each material.
Level of glucose, ranging from low content of sugar to very high level of glucose in blood.
Laboratories conducted tests.
ASTM E 691 (1999). Standard practice for conducting an interlaboratory study to determine the precision of a test method. American Society for Testing and Materials. West Conshohocken, PA, USA.
library(ILS) data(Glucose) summary(Glucose) attach(Glucose) str(Glucose) table(Replicate,Material,Laboratory) table(Laboratory,Material) st <- with(Glucose, tapply(Glucose, list(Material,Laboratory), mean)) st
library(ILS) data(Glucose) summary(Glucose) attach(Glucose) str(Glucose) table(Replicate,Material,Laboratory) table(Laboratory,Material) st <- with(Glucose, tapply(Glucose, list(Material,Laboratory), mean)) st
Function to estimate the Grubbs test statistic.
grubbs.test(x, ...) ## Default S3 method: grubbs.test( x, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL, alpha = 0.05, ... ) ## S3 method for class 'lab.qcdata' grubbs.test(x, alpha = 0.05, ...)
grubbs.test(x, ...) ## Default S3 method: grubbs.test( x, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL, alpha = 0.05, ... ) ## S3 method for class 'lab.qcdata' grubbs.test(x, alpha = 0.05, ...)
x |
An object of class |
... |
Other arguments passed to or from methods. |
var.index |
A scalar with the column number corresponding to the observed variable (the critical to quality variable). Alternativelly can be a string with the name of the quality variable. |
replicate.index |
A scalar with the column number corresponding to the index each replicate. |
material.index |
A scalar corresponding to the replicated number. |
laboratory.index |
A scalar that defines the index number of each laboratory. |
data.name |
A string specifying the name of the variable which appears on the plots. If name is not provided, it is taken from the object given as data. |
alpha |
The significance level (0.05 for default) |
Wilrich Peter-T. (2013), Critical values of Mandel's h and k, the Grubbs and the Cochran test statistic. Asta-Advances in Statistical Analysis, 97(1):1-10.
ASTM E 691 (1999), Standard practice for conducting an interlaboratory study to determine the precision of a test method. American Society for Testing and Materials. West Conshohocken, PA, USA.
library(ILS) data(Glucose) Glucose.qcdata<- lab.qcdata(Glucose) str(Glucose.qcdata) grubbs.test(Glucose.qcdata)
library(ILS) data(Glucose) Glucose.qcdata<- lab.qcdata(Glucose) str(Glucose.qcdata) grubbs.test(Glucose.qcdata)
This function is used to compute the Mandel's h statistic.
h.qcs(x, ...) ## Default S3 method: h.qcs( x, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL, alpha = 0.05, ... ) ## S3 method for class 'lab.qcdata' h.qcs(x, alpha = 0.05, ...)
h.qcs(x, ...) ## Default S3 method: h.qcs( x, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL, alpha = 0.05, ... ) ## S3 method for class 'lab.qcdata' h.qcs(x, alpha = 0.05, ...)
x |
An object of class |
... |
Other arguments passed to or from methods. |
var.index |
A scalar with the column number corresponding to the observed variable (the critical to quality variable). Alternativelly can be a string with the name of the quality variable. |
replicate.index |
A scalar with the column number corresponding to the index each replicate. |
material.index |
A scalar corresponding to the replicated number. |
laboratory.index |
A scalar that defines the index number of each laboratory. |
data.name |
A string specifying the name of the variable which appears on the plots. If name is not provided, it is taken from the object given as data. |
alpha |
The significance level (0.05 by default) |
Wilrich Peter-T. (2013), Critical values of Mandel's h and k, the Grubbs and the Cochran test statistic. Asta-Advances in Statistical Analysis, 97(1):1-10.
ASTM E 691 (1999), Standard practice for conducting an interlaboratory study to determine the precision of a test method. American Society for Testing and Materials. West Conshohocken, PA, USA.
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) h<- h.qcs(Glucose.qcdata, alpha = 0.005) summary(h) plot(h)
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) h<- h.qcs(Glucose.qcdata, alpha = 0.005) summary(h) plot(h)
Initial decomposition temperature (IDT) is a parameter defined by temperature at which a material loss 5% of its weight when it is heated using a constant rate. One hundred and five calcium oxalate samples were tested by thermogravimetric analysis (TG), obtaining 105 TG curves from which the IDT is extracted. Summarizing, IDT dataset is composed of the IDT values of calcium oxalate obtained by 7 different laboratories that analyze 15 oxalate samples each one.: Laboratory 1 uses a simultaneous thermal analyzer (STA) with an old calibration program, Laboratory 2 to Laboratory 4 use a SDT simultaneous analyzer, Laboratory 6 utilizes a SDT simultaneous analyzer with an old calibration, and Laboratory 7 uses a SDT simultaneous analyzer with a biased calibration (2 degrees Celsius shifted from the zinc melting point).
Dataframe of dimension 105 x 44. The first column corresponds to IDT variable, the second (Sample) is the replicate number, the third is the tested material (Material), and fourth is the laboratory.
Initial decomposition temperature.
The replicate number.
Tested material.
Laboratories conducted tests.
Naya, S., Tarrio-Saavedra. J., Lopez- Beceiro, J., Francisco Fernandez, M., Flores, M. and Artiaga, R. (2014), "Statistical functional approach for interlaboratory studies with thermal data". Journal of Thermal Analysis and Calorimetry, 118,1229-1243.
library(ILS) data(IDT) summary(IDT) attach(IDT) str(IDT) table(Sample,Run,Laboratory) table(Laboratory,Run) st <- with(IDT, tapply(IDT, list(Run,Laboratory), mean)) st
library(ILS) data(IDT) summary(IDT) attach(IDT) str(IDT) table(Sample,Run,Laboratory) table(Laboratory,Run) st <- with(IDT, tapply(IDT, list(Run,Laboratory), mean)) st
Interlaboratory Study
It performs interlaboratory studies (ILS) to detect those laboratories that provide non-consistent results when comparing to others. It permits to work simultaneously with various testing materials, from standard univariate, and functional data analysis (FDA) perspectives. The univariate approach based on ASTM E691-08 consist of estimating the Mandel's h and k statistics to identify those laboratories that provide more significant different results, testing also the presence of outliers by Cochran and Grubbs tests, Analysis of variance (ANOVA) techniques are provided (F and Tuckey tests) to test differences in the testing variable means corresponding to test differences in means corresponding to differente laboratories per each material. Taking into account the functional nature of data retrieved in analytical chemistry, applied physics and engineering (spectra, thermograms, etc.). ILS package provides a FDA approach for functional Mandel's k and h statistics by smoothing bootstrap resampling of distribution.
It Creates an object of class 'ils.fqcd' to perform statistical quality control. This object is used to plot functional data.
ils.fqcdata( x, p = NULL, index.laboratory = NULL, argvals = NULL, rangeval = NULL, names = NULL )
ils.fqcdata( x, p = NULL, index.laboratory = NULL, argvals = NULL, rangeval = NULL, names = NULL )
x |
A |
p |
The number of laboratories. |
index.laboratory |
The laboratory index. The index laboratory length should be equal a |
argvals |
Argvals, by default: |
rangeval |
The range of discretization points, by default: range(argvals). |
names |
Optional. A list with tree components: main an overall title, xlab title for x axis and ylab title for y axis. |
Febrero-Bande, M. and Oviedo, M. (2012), "Statistical computing in functional data analysis: the R package fda.usc". Journal of Statistical Software 51 (4), 1-28.
Naya, S., Tarrio-Saavedra. J., Lopez- Beceiro, J., Francisco Fernandez, M., Flores, M. and Artiaga, R. (2014), "Statistical functional approach for interlaboratory studies with thermal data". Journal of Thermal Analysis and Calorimetry, 118,1229-1243.
library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) xlab <- "Temperature (C)" ylab <- "Mass (%)" main <- "TG curves obtained from calcium oxalate" plot(x = fqcdata, main = main, xlab=xlab, ylab=xlab,col = 1:7,legend = TRUE)
library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) xlab <- "Temperature (C)" ylab <- "Mass (%)" main <- "TG curves obtained from calcium oxalate" plot(x = fqcdata, main = main, xlab=xlab, ylab=xlab,col = 1:7,legend = TRUE)
Create an object of class 'ils.fqcs' to perform statistical quality control. This function is used to compute requested FDA.
ils.fqcs(x, ...) ## Default S3 method: ils.fqcs(x, argvals = NULL, rangeval = NULL, ...) ## S3 method for class 'ils.fqcdata' ils.fqcs(x, ...) ## S3 method for class 'ils.fqcs' print(x, ...) ## S3 method for class 'ils.fqcs' summary(object, ...)
ils.fqcs(x, ...) ## Default S3 method: ils.fqcs(x, argvals = NULL, rangeval = NULL, ...) ## S3 method for class 'ils.fqcdata' ils.fqcs(x, ...) ## S3 method for class 'ils.fqcs' print(x, ...) ## S3 method for class 'ils.fqcs' summary(object, ...)
x |
An object of class |
... |
Other arguments passed to or from methods. |
argvals |
Argvals, by default: |
rangeval |
The range of discretization points, by default: range(argvals). |
object |
An object of class |
Febrero-Bande, M. and Oviedo, M. (2012), "Statistical computing in functional data analysis: the R package fda.usc". Journal of Statistical Software 51 (4), 1-28.
Cuevas A., Febrero-Bande, M. and Fraiman, R. (2006), "On the use of the bootstrap for estimating functions with functional data". Computational Statistics & Data Analysis 51, 2, 1063-1074.
Naya, S., Tarrio-Saavedra. J., Lopez- Beceiro, J., Francisco Fernandez, M., Flores, M. and Artiaga, R. (2014), "Statistical functional approach for interlaboratory studies with thermal data". Journal of Thermal Analysis and Calorimetry, 118,1229-1243.
library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) xlab <- "Temperature/ C" ylab <- "Mass/ %" fqcstat <- ils.fqcs(fqcdata) plot(fqcstat, xlab = xlab, ylab = ylab,legend = TRUE)
library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) xlab <- "Temperature/ C" ylab <- "Mass/ %" fqcstat <- ils.fqcs(fqcdata) plot(fqcstat, xlab = xlab, ylab = ylab,legend = TRUE)
This function is used to compute the statistic k of Mandel.
k.qcs(x, ...) ## Default S3 method: k.qcs( x, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL, alpha = 0.05, ... ) ## S3 method for class 'lab.qcdata' k.qcs(x, alpha = 0.05, ...)
k.qcs(x, ...) ## Default S3 method: k.qcs( x, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL, alpha = 0.05, ... ) ## S3 method for class 'lab.qcdata' k.qcs(x, alpha = 0.05, ...)
x |
An object of class |
... |
Other arguments passed to or from methods. |
var.index |
A scalar with the column number corresponding to the observed variable (the critical to quality variable). Alternativelly can be a string with the name of the quality variable. |
replicate.index |
A scalar with the column number corresponding to the index each replicate. |
material.index |
A scalar corresponding to the replicated number. |
laboratory.index |
A scalar that defines the index number of each laboratory. |
data.name |
A string specifying the name of the variable which appears on the plots. If name is not provided, it is taken from the object given as data. |
alpha |
The significance level (0.05 by default) |
Wilrich Peter-T. (2013), Critical values of Mandel's h and k, the Grubbs and the Cochran test statistic. Asta-Advances in Statistical Analysis, 97(1):1-10.
ASTM E 691 (1999), Standard practice for conducting an interlaboratory study to determine the precision of a test method. American Society for Testing and Materials. West Conshohocken, PA, USA.
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) k<- k.qcs(Glucose.qcdata, alpha = 0.005) summary(k) plot(k)
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) k<- k.qcs(Glucose.qcdata, alpha = 0.005) summary(k) plot(k)
Function to compute the analysis of variance of ILS data, taking into account the laboratories and material factors.
lab.aov(x, ...) ## Default S3 method: lab.aov( x, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL, level = 0.95, plot = FALSE, pages = 0, ... ) ## S3 method for class 'lab.qcdata' lab.aov(x, level = 0.95, plot = FALSE, pages = 0, ...)
lab.aov(x, ...) ## Default S3 method: lab.aov( x, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL, level = 0.95, plot = FALSE, pages = 0, ... ) ## S3 method for class 'lab.qcdata' lab.aov(x, level = 0.95, plot = FALSE, pages = 0, ...)
x |
An object of class |
... |
Other arguments passed to or from methods. |
var.index |
A scalar with the column number corresponding to the observed variable (the critical to quality variable). Alternativelly can be a string with the name of the quality variable. |
replicate.index |
A scalar with the column number corresponding to the index each replicate. |
material.index |
A scalar corresponding to the replicated number. |
laboratory.index |
A scalar that defines the index number of each laboratory. |
data.name |
A string specifying the name of the variable which appears on the plots. If name is not provided, it is taken from the object given as data. |
level |
Requested confidence level (0.95 by default). |
plot |
If TRUE, confidence intervals are plot. |
pages |
By default 0, it indicates the number of pages over which to spread the output. For example, if pages=1, all terms will be plotted on one page with the layout performed automatically. If pages=0, one plot will be displayed by each tested material. |
WHothorn T., Bretz, F., and Westfall, P. (2008), Simultaneous inference in general parametric models. Biometrical Journal, 50(3):346-363.
Heyden, Y., Smeyers-Verbeke, J. (2007), Set-up and evaluation of interlaboratory studies. J. Chromatogr. A, 1158:158-167.
## Not run: library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) lab.aov(Glucose.qcdata,level = 0.95, plot = TRUE, pages = 1) ## End(Not run)
## Not run: library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) lab.aov(Glucose.qcdata,level = 0.95, plot = TRUE, pages = 1) ## End(Not run)
It creates a 'lab.qcdata' class object to perform the interlaboratory study. This object is used to plot ILS data and more.
lab.qcdata( data, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL )
lab.qcdata( data, var.index = 1, replicate.index = 2, material.index = 3, laboratory.index = 4, data.name = NULL )
data |
A matrix or data-frame that contains the data, replicate index, type of material, and the laboratory. |
var.index |
A scalar with the column number corresponding to the observed variable (the critical to quality variable). Alternativelly can be a string with the name of the quality variable. |
replicate.index |
A scalar with the column number corresponding to the index each replicate. |
material.index |
A scalar corresponding to the replicated number. |
laboratory.index |
A scalar that defines the index number of each laboratory. |
data.name |
A string specifying the name of the variable which appears on the plots. If name is not provided, it is taken from the object given as data. |
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) summary(Glucose.qcdata)
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) summary(Glucose.qcdata)
It develops an object of lab.qcs
-codelinkclass to perform statistical quality control.
This function is used to compute the requested statistics to be summarized and ploted.
lab.qcs(x, ...) ## S3 method for class 'lab.qcs' print(x, ...) ## S3 method for class 'lab.qcs' summary(object, ...)
lab.qcs(x, ...) ## S3 method for class 'lab.qcs' print(x, ...) ## S3 method for class 'lab.qcs' summary(object, ...)
x |
An object of class |
... |
Other arguments passed to or from methods. |
object |
An object of class |
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) Glucose.qcs <- lab.qcs(Glucose.qcdata) str(Glucose.qcs) summary(Glucose.qcs)
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) Glucose.qcs <- lab.qcs(Glucose.qcdata) str(Glucose.qcs) summary(Glucose.qcs)
It develops an object of 'mandel.fqcs' class to perform statistical quality control analysis. This function is used to compute the functional approach of Mandel's h and k statistic. It is specifically designed to deal with experimental data results defined by curves such as thermograms and spectra.
mandel.fqcs(x, ...) ## Default S3 method: mandel.fqcs( x, p = NULL, index.laboratory = NULL, argvals = NULL, rangeval = NULL, names = NULL, ... ) ## S3 method for class 'ils.fqcdata' mandel.fqcs( x, fdep = depth.mode, outlier = TRUE, trim = 0.01, alpha = 0.01, nb = 200, smo = 0.05, ... )
mandel.fqcs(x, ...) ## Default S3 method: mandel.fqcs( x, p = NULL, index.laboratory = NULL, argvals = NULL, rangeval = NULL, names = NULL, ... ) ## S3 method for class 'ils.fqcdata' mandel.fqcs( x, fdep = depth.mode, outlier = TRUE, trim = 0.01, alpha = 0.01, nb = 200, smo = 0.05, ... )
x |
A |
... |
Other arguments passed to or from other methods. |
p |
The number of laboratories. |
index.laboratory |
The laboratory index. The index laboratory length should be equal a |
argvals |
Argvals, by default: |
rangeval |
The range of discretization points, by default: range(argvals). |
names |
Optional. A list with tree components: main an overall title, xlab title for x axis and ylab title for y axis. |
fdep |
Type of depth measure, by default depth.mode. |
outlier |
= TRUE |
trim |
The alpha of the trimming. |
alpha |
Significance level, by defaul 1%. |
nb |
The number of bootstrap samples. |
smo |
The smoothing parameter for the bootstrap samples. |
Febrero-Bande, M. and Oviedo, M. (2012), "Statistical computing in functional data analysis: the R package fda.usc". Journal of Statistical Software 51 (4), 1-28.
Cuevas A., Febrero-Bande, M. and Fraiman, R. (2006), "On the use of the bootstrap for estimating functions with functional data". Computational Statistics & Data Analysis 51, 2, 1063-1074.
Naya, S., Tarrio-Saavedra. J., Lopez- Beceiro, J., Francisco Fernandez, M., Flores, M. and Artiaga, R. (2014), "Statistical functional approach for interlaboratory studies with thermal data". Journal of Thermal Analysis and Calorimetry, 118,1229-1243.
## Not run: library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) mandel.tg <- mandel.fqcs(fqcdata.tg,nb = 200) plot(mandel.tg,legend = F,col=c(rep(3,5),1,1)) ## End(Not run)
## Not run: library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) mandel.tg <- mandel.fqcs(fqcdata.tg,nb = 200) plot(mandel.tg,legend = F,col=c(rep(3,5),1,1)) ## End(Not run)
Procedure for detecting funcitonal outliers.
outliers.ils(x, fdep = depth.FM, trim = 0.01)
outliers.ils(x, fdep = depth.FM, trim = 0.01)
x |
An object of classs |
fdep |
Type of depth measure, by default depth.mode. |
trim |
The percentaje of the trimming, by default is 1%. |
Generic function to plot objects of 'ils.fqcdata' class
## S3 method for class 'ils.fqcdata' plot( x, type = "l", main = NULL, xlab = NULL, ylab = NULL, ylim = NULL, x.co = NULL, y.co = NULL, legend = TRUE, col = NULL, ... )
## S3 method for class 'ils.fqcdata' plot( x, type = "l", main = NULL, xlab = NULL, ylab = NULL, ylim = NULL, x.co = NULL, y.co = NULL, legend = TRUE, col = NULL, ... )
x |
An object class of |
type |
1-character string giving the type of plot desired. The following values are possible for fdata class object: "l" for lines (by default), "p" for points, , "o" for overplotted points and lines, "b", "c" for (empty if "c") points joined by lines, "s" and "S" for stair steps and "h" for histogram-like vertical lines. Finally, "n" does not produce any points or lines. The following values are possible for fdata2d class object: "image.contour" (by default) to display three-dimensional data and add the contour lines, "image" to display three-dimensional data, "contour" to display a contour plot, "persp" to display a perspective plots of a surface over the x-y plane and "filled.contour" to display a contour plot with the areas between the contours filled in solid color. |
main |
Main title for the plot. |
xlab |
Title for the x axis. |
ylab |
Title for the y axis. |
ylim |
The y limits of the plot. |
x.co |
It speficies the x co-ordinates to be used to place a legend. |
y.co |
It specifies the y co-ordinates to be used to place a legend. |
legend |
Logical argument. Default is TRUE then The legend default is used. |
col |
Color specifications |
... |
Other arguments passed to matplot function (for fdata class). |
Febrero-Bande, M. and Oviedo, M. (2012), "Statistical computing in functional data analysis: the R package fda.usc". Journal of Statistical Software 51 (4), 1-28.
Naya, S., Tarrio-Saavedra. J., Lopez- Beceiro, J., Francisco Fernandez, M., Flores, M. and Artiaga, R. (2014), "Statistical functional approach for interlaboratory studies with thermal data". Journal of Thermal Analysis and Calorimetry, 118,1229-1243.
## Not run: library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) windows() xlab <- "Temperature (C)" ylab <- "Mass (%)" main <- "TG curves obtained from calcium oxalate" plot(x = fqcdata, main = main, xlab=xlab, ylab=ylab,legend = TRUE) ## End(Not run)
## Not run: library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) windows() xlab <- "Temperature (C)" ylab <- "Mass (%)" main <- "TG curves obtained from calcium oxalate" plot(x = fqcdata, main = main, xlab=xlab, ylab=ylab,legend = TRUE) ## End(Not run)
Generic function to plot objects of 'ils.fqcs' class. Results of functional ILS studies are graphically shown.
## S3 method for class 'ils.fqcs' plot(x, type = "l", xlab = NULL, ylab = NULL, legend = TRUE, col = NULL, ...)
## S3 method for class 'ils.fqcs' plot(x, type = "l", xlab = NULL, ylab = NULL, legend = TRUE, col = NULL, ...)
x |
An object of class |
type |
1-character string giving the type of plot desired. The following values are possible for fdata class object: "l" for lines (by default), "p" for points, , "o" for overplotted points and lines, "b", "c" for (empty if "c") points joined by lines, "s" and "S" for stair steps and "h" for histogram-like vertical lines. Finally, "n" does not produce any points or lines. The following values are possible for fdata2d class object: "image.contour" (by default) to display three-dimensional data and add the contour lines, "image" to display three-dimensional data, "contour" to display a contour plot, "persp" to display a perspective plots of a surface over the x-y plane and "filled.contour" to display a contour plot with the areas between the contours filled in solid color. |
xlab |
Title for the x axis. |
ylab |
Title for the y axis. |
legend |
Logical argument. Default is TRUE then The legend default is used. |
col |
Color specifications. |
... |
Other arguments to be passed to or from methods. |
Febrero-Bande, M. and Oviedo, M. (2012), "Statistical computing in functional data analysis: the R package fda.usc". Journal of Statistical Software 51 (4), 1-28.
Naya, S., Tarrio-Saavedra. J., Lopez- Beceiro, J., Francisco Fernandez, M., Flores, M. and Artiaga, R. (2014), "Statistical functional approach for interlaboratory studies with thermal data". Journal of Thermal Analysis and Calorimetry, 118,1229-1243.
library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) xlab <- "Temperature/ C" ylab <- "Mass/ %" fqcstat <- ils.fqcs(fqcdata) plot(fqcstat, xlab = xlab, ylab = ylab,legend = TRUE)
library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) xlab <- "Temperature/ C" ylab <- "Mass/ %" fqcstat <- ils.fqcs(fqcdata) plot(fqcstat, xlab = xlab, ylab = ylab,legend = TRUE)
Generic function for plotting objects of 'lab.qcdata' class. Results of univariate ILS studies are graphically shown.
## S3 method for class 'lab.qcdata' plot(x, xlab = NULL, ylab = NULL, col = "blue", ...)
## S3 method for class 'lab.qcdata' plot(x, xlab = NULL, ylab = NULL, col = "blue", ...)
x |
An object of class |
xlab |
Title for the x axis. |
ylab |
Title for the y axis. |
col |
Color of type material, when there only one. |
... |
Other arguments to be passed to or from methods. |
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) plot(Glucose.qcdata)
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) str(Glucose.qcdata) plot(Glucose.qcdata)
Generic function for plotting objects of 'lab.qcs' class. Results of univariate ILS studies are graphically shown.
## S3 method for class 'lab.qcs' plot(x, title = NULL, xlab = NULL, ylab = NULL, col = NULL, ylim = NULL, ...)
## S3 method for class 'lab.qcs' plot(x, title = NULL, xlab = NULL, ylab = NULL, col = NULL, ylim = NULL, ...)
x |
An object of class |
title |
Main title for the plot. |
xlab |
Title for the x axis. |
ylab |
Title for the y axis. |
col |
Color specifications. |
ylim |
A Numeric vectors of length 2 (coordinates ranges). |
... |
Other arguments to be passed to or from methods. |
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) Glucose.qcs <- lab.qcs(Glucose.qcdata) plot(Glucose.qcs)
library(ILS) data(Glucose) Glucose.qcdata <- lab.qcdata(Glucose) Glucose.qcs <- lab.qcs(Glucose.qcdata) plot(Glucose.qcs)
Generic function to plot objects of 'mandel.fqcs' class. Results of functional ILS studies are graphically shown.
## S3 method for class 'mandel.fqcs' plot( x, xlab = NULL, ylab = NULL, x.co = NULL, y.co = NULL, legend = TRUE, col = NULL, ... )
## S3 method for class 'mandel.fqcs' plot( x, xlab = NULL, ylab = NULL, x.co = NULL, y.co = NULL, legend = TRUE, col = NULL, ... )
x |
An object of class |
xlab |
Title for the x axis. |
ylab |
Title for the y axis. |
x.co |
It speficies the x co-ordinates to be used to place a legend. |
y.co |
It specifies the y co-ordinates to be used to place a legend. |
legend |
Logical argument. Default is TRUE then The legend default is used. |
col |
Color specifications. |
... |
Other arguments to be passed to or from methods. |
Febrero-Bande, M. and Oviedo, M. (2012), "Statistical computing in functional data analysis: the R package fda.usc". Journal of Statistical Software 51 (4), 1-28.
Naya, S., Tarrio-Saavedra. J., Lopez- Beceiro, J., Francisco Fernandez, M., Flores, M. and Artiaga, R. (2014), "Statistical functional approach for interlaboratory studies with thermal data". Journal of Thermal Analysis and Calorimetry, 118,1229-1243.
## Not run: library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) mandel.tg <- mandel.fqcs(fqcdata.tg,nb = 200) plot(mandel.tg,legend = F,col=c(rep(3,5),1,1)) ## End(Not run) # $H(t)$ y $K(t)$
## Not run: library(ILS) data(TG) delta <- seq(from = 40 ,to = 850 ,length.out = 1000 ) fqcdata <- ils.fqcdata(TG, p = 7, argvals = delta) mandel.tg <- mandel.fqcs(fqcdata.tg,nb = 200) plot(mandel.tg,legend = F,col=c(rep(3,5),1,1)) ## End(Not run) # $H(t)$ y $K(t)$
One hundred and five Calcium oxalate samples were tested by thermogravimetric (TG) analysis, obtaining 105 TG curves that shows the mass loss of oxalate depending on time when samples are heated at a constant temperature rate. Dataset is composed by fifteen TG curves of 1000 observations each of overall 7 different laboratories. Laboratory 1 uses a simultaneous thermal analyzer (STA) with an old calibration program, Laboratory 2 to Laboratory 4 use a SDT simultaneous analyzer, Laboratory 6 utilizes a SDT simultaneous analyzer with an old calibration, and Laboratory 7 uses a SDT simultaneous analyzer with a biased calibration (2 degrees Celsius shifted from the zinc melting point).
A 15 x 1000 x 7 dimension array , where each matrix consists of the 15 TG curves obtained testing 15 different oxalate samples, and evaluated in 1000 different values of temperature. These 15 curves were obtained for each of the overall 7 laboratories that have performed the esperiments.
Thermogravimetric.
Naya, S., Tarrio-Saavedra. J., Lopez- Beceiro, J., Francisco Fernandez, M., Flores, M. and Artiaga, R. (2014), "Statistical functional approach for interlaboratory studies with thermal data". Journal of Thermal Analysis and Calorimetry, 118,1229-1243.
library(ILS) data(TG) summary(TG)
library(ILS) data(TG) summary(TG)