#phan tích dữ liệu

t="D:\\van anh\\DU LIEU PT\\DATA FOR R.csv"
c0=read.csv(t)
head(c0)

##   id TIME C..0.3.
## 1  1    0     3.2
## 2  2    0     5.0
## 3  3    0     2.7
## 4  4    0     3.2
## 5  5    1     4.5
## 6  6    1     7.2

#phân tích dữ liệu từ 0-3 tháng
hist(c0$C..0.3., breaks=20, col="blue", border="white")

#phân tích dữ liệu từ 3 đến 12 tháng
t= "D:\\van anh\\DU LIEU PT\\tu3 den 12 thang.csv"
cc=read.csv(t)
head(cc)

##   ID time   c2
## 1  1 3.33  5.7
## 2  2 4.33  7.2
## 3  3 5.33 10.7
## 4  4 6.27  7.7
## 5  5 7.30  4.2
## 6  6 8.30  6.1

hist(cc$c2, breaks = 20, col = "blue", border = "white")

#phân tích dữ liệu trên 1 năm
t="D:\\van anh\\DU LIEU PT\\tren 1 nam.csv"
cm=read.csv(t)
head(cm)

##   ID  Time  C3
## 1  1 12.43 5.4
## 2  2 13.37 7.2
## 3  3 14.43 3.5
## 4  4 15.30 4.3
## 5  5 17.40 3.0
## 6  6 19.33 7.5

hist(cm$C3, breaks = 20, col = "blue", border = "white")