install.packages("metansue")
install.packages("R.matlab")
data <- read.table("example1.txt", header = TRUE)
cd /Users/chao-ganyan/Library/R/3.6/library
ls
pwd
cd /Users/chao-ganyan/Library/R/3.6/library
t <- c(3.4, NA, NA, NA, NA, 2.8, 2.1, 3.1, 2.0, 3.4)
n <- c(40, 20, 22, 24, 18, 30, 25, 30, 16, 22)
m <- meta(smc_from_t(t, n))
library("metansue")
m <- meta(smc_from_t(t, n))
m
View(m)
metabias(m)
d <- smc_from_t(t, n)
View(d)
View(m)
library("R.matlab")
readMat('/Users/ycg/Dropbox/ITraAllOnline/ITraAll/ITraWork/Course/DPABINetAdvancedCourse/DataSoft/Data/DemoData_DPABINet/GTA/A.mat')
mat -< readMat('/Users/ycg/Dropbox/ITraAllOnline/ITraAll/ITraWork/Course/DPABINetAdvancedCourse/DataSoft/Data/DemoData_DPABINet/GTA/A.mat')
mat <- readMat('/Users/ycg/Dropbox/ITraAllOnline/ITraAll/ITraWork/Course/DPABINetAdvancedCourse/DataSoft/Data/DemoData_DPABINet/GTA/A.mat')
A <- mat[["A"]]
is.empty(A)
is.empty.model(A)
length(A)
length(A) == 0
length(m) == 0
length(n) == 0
c <- matrix(0, 8, 2)
View(c)
size(c)
nrow(c)
c <- matrix(0, 10, 2)
x <- smc_from_t(t, n)
View(x)
x.y
x[y]
x[['y']]
c[,1] = x[['y']]
View(c)
c[,2] = x[['y']]
View(c)
EffectSize <- matrix(0, 10, 2)
EffectSize[1,] = x[['y']]
View(c)
EffectSize <- matrix(0, 10, 10)
EffectSize[1,] = x[['y']]
EffectSize2 <- matrix(0, 10, 10)
EffectSize2[,2] = x[['y']]
View(EffectSize)
View(EffectSize2)
View(EffectSize)
View(EffectSize2)
View(EffectSize)
View(EffectSize2)
View(EffectSize)
