Phân tích tổng hợp nồng độ

t="D:\\van anh\\DU LIEU PT\\data concentrations\\du lieu tong hop.csv"
th=read.csv(t)
head(th)

##   ID Time Concen
## 1  1 0.03    3.2
## 2  1 0.13    5.0
## 3  1 0.30    2.7
## 4  1 0.43    3.2
## 5  1 0.60    4.5
## 6  1 1.47    7.2

#mô tả dữ liệu nồng độ
library(DescTools)
Desc(th$Concen)

## ------------------------------------------------------------------------- 
## th$Concen (numeric)
## 
##   length      n    NAs  unique    0s   mean  meanCI
##    3'020  3'018      2     192     0   6.98    6.85
##           99.9%   0.1%          0.0%           7.11
##                                                    
##      .05    .10    .25  median   .75    .90     .95
##     3.00   3.50   4.60    6.10  8.40  11.23   13.60
##                                                    
##    range     sd  vcoef     mad   IQR   skew    kurt
##    70.00   3.64   0.52    2.67  3.80   3.19   34.41
##                                                    
## lowest : 1.0, 1.4 (3), 1.5, 1.6 (5), 1.7 (3)
## highest: 25.1, 27.2, 27.8, 31.2, 71.0

#Mô tả mối tương quan giữa nồng độ theo thời gian
plot(th$Concen~ th$Time,pch=16, col="black")
abline(lm(th$Concen ~th$Time), col="red")