Dataset composed of the initial decomposition temperature (IDT) of different samples of Calcium Oxalate, obtained by 7 different laboratories

Description

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).

Format

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.

References

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.

Examples

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

Results

R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(ILS)
Loading required package: multcomp
Loading required package: mvtnorm
Loading required package: survival
Loading required package: TH.data
Loading required package: MASS

Attaching package: 'TH.data'

The following object is masked from 'package:MASS':

    geyser

Loading required package: depthTools
Loading required package: fda.usc
Loading required package: fda
Loading required package: splines
Loading required package: Matrix

Attaching package: 'fda'

The following object is masked from 'package:graphics':

    matplot

Loading required package: mgcv
Loading required package: nlme
This is mgcv 1.8-12. For overview type 'help("mgcv-package")'.
Loading required package: rpart

 Package ILS: Interlaboratory Study 
 version 0.1.0 (built on 2016-05-22).
 Copyright Miguel A. Flores Sanchez 2016. 


Attaching package: 'ILS'

The following object is masked from 'package:nlme':

    Glucose

> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/ILS/IDT.Rd_%03d_medium.png", width=480, height=480)
> ### Name: IDT
> ### Title: Dataset composed of the initial decomposition temperature (IDT)
> ###   of different samples of Calcium Oxalate, obtained by 7 different
> ###   laboratories
> ### Aliases: IDT
> 
> ### ** Examples
> 
> library(ILS)
> data(IDT)
> summary(IDT)
      IDT            Sample        Run    Laboratory
 Min.   :162.4   Min.   : 1   Min.   :1   Lab 1:15  
 1st Qu.:164.1   1st Qu.: 4   1st Qu.:1   Lab 2:15  
 Median :164.1   Median : 8   Median :1   Lab 3:15  
 Mean   :164.4   Mean   : 8   Mean   :1   Lab 4:15  
 3rd Qu.:164.9   3rd Qu.:12   3rd Qu.:1   Lab 5:15  
 Max.   :166.5   Max.   :15   Max.   :1   Lab 6:15  
                                          Lab 7:15  
> attach(IDT)
The following object is masked _by_ .GlobalEnv:

    IDT

The following object is masked from package:ILS:

    IDT

> str(IDT)
'data.frame':	105 obs. of  4 variables:
 $ IDT       : num  165 166 165 166 165 ...
 $ Sample    : int  1 2 3 4 5 6 7 8 9 10 ...
 $ Run       : num  1 1 1 1 1 1 1 1 1 1 ...
 $ Laboratory: Factor w/ 7 levels "Lab 1","Lab 2",..: 1 1 1 1 1 1 1 1 1 1 ...
> table(Sample,Run,Laboratory)
, , Laboratory = Lab 1

      Run
Sample 1
    1  1
    2  1
    3  1
    4  1
    5  1
    6  1
    7  1
    8  1
    9  1
    10 1
    11 1
    12 1
    13 1
    14 1
    15 1

, , Laboratory = Lab 2

      Run
Sample 1
    1  1
    2  1
    3  1
    4  1
    5  1
    6  1
    7  1
    8  1
    9  1
    10 1
    11 1
    12 1
    13 1
    14 1
    15 1

, , Laboratory = Lab 3

      Run
Sample 1
    1  1
    2  1
    3  1
    4  1
    5  1
    6  1
    7  1
    8  1
    9  1
    10 1
    11 1
    12 1
    13 1
    14 1
    15 1

, , Laboratory = Lab 4

      Run
Sample 1
    1  1
    2  1
    3  1
    4  1
    5  1
    6  1
    7  1
    8  1
    9  1
    10 1
    11 1
    12 1
    13 1
    14 1
    15 1

, , Laboratory = Lab 5

      Run
Sample 1
    1  1
    2  1
    3  1
    4  1
    5  1
    6  1
    7  1
    8  1
    9  1
    10 1
    11 1
    12 1
    13 1
    14 1
    15 1

, , Laboratory = Lab 6

      Run
Sample 1
    1  1
    2  1
    3  1
    4  1
    5  1
    6  1
    7  1
    8  1
    9  1
    10 1
    11 1
    12 1
    13 1
    14 1
    15 1

, , Laboratory = Lab 7

      Run
Sample 1
    1  1
    2  1
    3  1
    4  1
    5  1
    6  1
    7  1
    8  1
    9  1
    10 1
    11 1
    12 1
    13 1
    14 1
    15 1

> table(Laboratory,Run)
          Run
Laboratory  1
     Lab 1 15
     Lab 2 15
     Lab 3 15
     Lab 4 15
     Lab 5 15
     Lab 6 15
     Lab 7 15
> st <- with(IDT, tapply(IDT, list(Run,Laboratory), mean))
> st
     Lab 1    Lab 2    Lab 3    Lab 4    Lab 5    Lab 6    Lab 7
1 164.4324 164.1081 164.2703 164.1622 164.1622 164.2162 165.7297
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>