Đánh giá Độ ảnh hưởng của RNA/DNA 16S
Nguyễn Phúc Như Hà
June 9, 2017
nhom3.lan1 = read.csv("E:\\Google Drive\\20170526 Chi Ha SHPT\\R\\data\\nhom3.Nhom3Lan0-1-6-Lan2.csv",header = TRUE)
##xem qua du lieu cua minh
head(nhom3.lan1)## IDBenhNhan MI.0 BI.0 RLEP.0 RnaDna16s.0 time treatment
## 1 94 10 5 96800 0.6914069 0 1
## 2 90 12 4 99800 0.7138568 0 1
## 3 91 14 4 768000 0.7047716 0 1
## 4 99 23 4 317000 0.6878312 0 1
## 5 93 34 5 7540000 0.8601909 0 1
## 6 96 12 5 99400 1.2371603 0 1#Xem qua cau truc cu nhom
str(nhom3.lan1)## 'data.frame': 54 obs. of 7 variables:
## $ IDBenhNhan : int 94 90 91 99 93 96 92 95 97 94 ...
## $ MI.0 : int 10 12 14 23 34 12 14 29 11 10 ...
## $ BI.0 : int 5 4 4 4 5 5 5 5 4 5 ...
## $ RLEP.0 : int 96800 99800 768000 317000 7540000 99400 168000 40300 272000 17600 ...
## $ RnaDna16s.0: num 0.691 0.714 0.705 0.688 0.86 ...
## $ time : int 0 0 0 0 0 0 0 0 0 1 ...
## $ treatment : int 1 1 1 1 1 1 1 1 1 1 ...#Kiem tra nhom 3 co phai la data frame
is.data.frame(nhom3.lan1)## [1] TRUEnhom1 <- read.csv("E:\\Google Drive\\20170526 Chi Ha SHPT\\R\\data\\Nhom1.Nhom4Lan0-1-6-12.csv",header = TRUE)
##xem qua du lieu cua minh
head(nhom1)## IDBenhNhan MI.0 BI.0 RLEP.0 RnaDna16s.0 RnaDna18k.0 Time
## 1 17 2 2 3630 0.3899750 0.0000000 0
## 2 33 11 4 15700 0.9662293 0.0000000 0
## 3 42 23 5 523000 1.0849456 0.1581956 0
## 4 57 10 4 10600 1.1924612 0.5743945 0
## 5 62 23 5 982000 0.7484571 0.4177025 0
## 6 25 18 4 253000 0.8916757 0.6571819 0#Xem qua cau truc cu nhom
str(nhom1)## 'data.frame': 136 obs. of 7 variables:
## $ IDBenhNhan : int 17 33 42 57 62 25 49 28 18 11 ...
## $ MI.0 : int 2 11 23 10 23 18 6 29 2 11 ...
## $ BI.0 : int 2 4 5 4 5 4 3 6 3 3 ...
## $ RLEP.0 : num 3630 15700 523000 10600 982000 ...
## $ RnaDna16s.0: num 0.39 0.966 1.085 1.192 0.748 ...
## $ RnaDna18k.0: num 0 0 0.158 0.574 0.418 ...
## $ Time : int 0 0 0 0 0 0 0 0 0 0 ...#Kiem tra nhom 3 co phai la data frame
is.data.frame(nhom1)## [1] TRUEnhom2 <- read.csv("E:\\Google Drive\\20170526 Chi Ha SHPT\\R\\data\\Nhom2.Nhom3Lan0-6-12-Lan2.csv",header = TRUE)
##xem qua du lieu cua minh
head(nhom2)## IDBenhNhan MI.0 BI.0 RLEP.0 RnaDna16s.0 RnaDna18k.0 Time
## 1 45 4 4 30400 1.1049442 0.4141899 0
## 2 66 31 4 30700 0.4554677 0.0000000 0
## 3 71 19 4 764302 0.6350542 1.2823590 0
## 4 77 22 4 656540 0.9802799 0.3822505 0
## 5 79 12 5 546301 1.0000139 0.9233616 0
## 6 80 19 4 54321 0.9718857 0.0000000 0#Xem qua cau truc cu nhom
str(nhom2)## 'data.frame': 39 obs. of 7 variables:
## $ IDBenhNhan : int 45 66 71 77 79 80 81 82 83 84 ...
## $ MI.0 : int 4 31 19 22 12 19 12 11 11 7 ...
## $ BI.0 : int 4 4 4 4 5 4 5 4 3 3 ...
## $ RLEP.0 : num 30400 30700 764302 656540 546301 ...
## $ RnaDna16s.0: num 1.105 0.455 0.635 0.98 1 ...
## $ RnaDna18k.0: num 0.414 0 1.282 0.382 0.923 ...
## $ Time : int 0 0 0 0 0 0 0 0 0 0 ...#Kiem tra nhom 3 co phai la data frame
is.data.frame(nhom2)## [1] TRUElibrary("lattice")
library("lme4")## Loading required package: Matrixlibrary("rms")## Loading required package: Hmisc## Loading required package: survival## Loading required package: Formula## Loading required package: ggplot2##
## Attaching package: 'Hmisc'## The following objects are masked from 'package:base':
##
## format.pval, round.POSIXt, trunc.POSIXt, units## Loading required package: SparseM##
## Attaching package: 'SparseM'## The following object is masked from 'package:base':
##
## backsolve## Warning in if (!x$as.table) {: the condition has length > 1 and only the
## first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in diff(as.numeric(y[ord])): NAs introduced by coercion## Warning in if (!x$as.table) {: the condition has length > 1 and only the
## first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in (function (x, y, type = "p", groups = NULL, pch = if
## (is.null(groups)) plot.symbol$pch else superpose.symbol$pch, : NAs
## introduced by coercion## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!x$as.table) {: the condition has length > 1 and only the
## first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!x$as.table) {: the condition has length > 1 and only the
## first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!x$as.table) {: the condition has length > 1 and only the
## first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!x$as.table) {: the condition has length > 1 and only the
## first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
## Warning in if (!as.table) row == 1 else row == layout.dim[1]: the condition
## has length > 1 and only the first element will be used
Phân tích nhóm 1: Phân tích 16s
s16 = nhom1$RnaDna16s.0
thoigian = nhom1$Time
m= lm (s16~thoigian)
#Vẽ biểu đồ tương quan của 18k với thời gian
plot(m)
fit16.1 = by (nhom1, nhom1$IDBenhNhan, function(data) fitted.values (lm (RnaDna16s.0 ~ Time, data = data)))
fit16.1 = unlist(fit16.1)
names(fit16.1) = NULL
interaction.plot(nhom1$Time, nhom1$IDBenhNhan, fit16.1, xlab = "Thoi Gian", ylab = "rRNA/DNA 16s ratio")
#tính trung binh kiểm định t trong thời điểm đầu
new.nhom1 = nhom1 [order(nhom1$Time), ]
s16.0 = nhom1$RnaDna16s.0[1:34]
s16.0## [1] 0.3899750 0.9662293 1.0849456 1.1924612 0.7484571 0.8916757 0.6879172
## [8] 1.3473366 0.5782708 0.2144813 0.7207903 0.8546990 2.3403119 0.8450410
## [15] 0.4466960 0.7413186 0.7791702 0.6773753 0.7656988 0.8306925 0.8422851
## [22] 1.0895081 0.9463608 1.2149860 1.3224555 0.9256852 1.2008810 0.7761954
## [29] 1.2877231 0.8733445 0.9170086 2.3289805 1.0400381 0.9031621t.test(s16.0)##
## One Sample t-test
##
## data: s16.0
## t = 13.014, df = 33, p-value = 1.513e-14
## alternative hypothesis: true mean is not equal to 0
## 95 percent confidence interval:
## 0.8131999 1.1145741
## sample estimates:
## mean of x
## 0.963887Chúng ta thấy qua kết quả trên rằng tỉ lệ 16s ban đầu là 0,628, khoảng tin cậy từ (0.47 - 0.78)
Phân tích 18k:
k18 = nhom1$RnaDna18k.0
thoigian = nhom1$Time
m= lm (k18~thoigian)
#Vẽ biểu đồ tương quan của 18k với thời gian
plot(m)
fit18.1 = by (nhom1, nhom1$IDBenhNhan, function(data) fitted.values (lm (RnaDna18k.0 ~ Time, data = data)))
fit18.1 = unlist(fit18.1)
names(fit18.1) = NULL
#Vẻ biểu đồ đương theo thời gian
interaction.plot(nhom1$Time, nhom1$IDBenhNhan, fit18.1, xlab = "Thoi Gian", ylab = "rRNA/DNA 18K ratio")
new.nhom1 = nhom1 [order(nhom1$Time), ]
k18.0 = nhom1$RnaDna18k.0 [1:34]
k18.0## [1] 0.00000000 0.00000000 0.15819555 0.57439448 0.41770246 0.65718192
## [7] 0.44701519 1.06415500 0.46583947 0.03108466 0.16003350 0.98007216
## [13] 0.75991031 0.99209863 0.24711310 0.86599919 0.48481911 0.59327370
## [19] 0.38643235 0.00000000 0.90650274 0.67644022 0.90383632 0.94675320
## [25] 0.60435625 0.52640451 1.15679500 0.95843729 1.33608791 0.42442015
## [31] 1.14646608 0.77621261 0.45852099 0.46583084t.test(k18.0)##
## One Sample t-test
##
## data: k18.0
## t = 9.7062, df = 33, p-value = 3.398e-11
## alternative hypothesis: true mean is not equal to 0
## 95 percent confidence interval:
## 0.4782421 0.7318982
## sample estimates:
## mean of x
## 0.6050701Chúng ta thấy qua kết quả trên rằng tỉ lệ 16s ban đầu là 0,628, khoảng tin cậy từ (0.47 - 0.78)