小编ale*_*lex的帖子

使用R xtable在乳胶表中的行之间添加水平线

我有这样的乳胶表生成代码示例

df<-data.frame(name=rep(letters[1:7],each=24),salary=runif(24*7,100,200))
lst<-tapply(df$salary,df$name,matrix,nrow=4,byrow=T)
xlst<-lapply(lst,xtable)
Run Code Online (Sandbox Code Playgroud)

现在我想在每个表中的每一行之后自动引入\ hdashline,并且在R代码之间的表之间还有一个\ vspace {2em} Wat我试过这个

for(i in seq_along(lst)){
  addtorow[i] <- list(pos = list(seq_len(nrow(lst[[i]])-1)),
                      command = "\\hdashline \n")
}
Run Code Online (Sandbox Code Playgroud)

扫描更改我需要进行循环..它适用于我申请单个表但不能在for循环中工作...任何帮助非常感谢...

latex r xtable

7
推荐指数
1
解决办法
6381
查看次数

每10行转换一列(约10,000行)

我有一个包含5列的csv文件.我想将第四列csv文件转换到第10行.并且第5列csv文件需要每10行转换一次,直到列的末尾.我无法为此循环.很感谢任何形式的帮助.谢谢!

test<-read.csv("sample.csv",sep=',') 
first<-test$col4[1:10] 
t(first) 
n=length(sample.csv) 
b<-1:1000 
a<-1:10 
for(i in 1:n) { 
  second<-test[a-9:a]
}
Run Code Online (Sandbox Code Playgroud)

我已经读过第4列第10行并转换它们.我想把第五列放在一个循环中并转置,然后转换'rbind'这两个.

r

1
推荐指数
1
解决办法
1880
查看次数

标签 统计

r ×2

latex ×1

xtable ×1