Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/68.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 添加前导空格，使列中所有单元格的字符长度等于最大长度_R - Fatal编程技术网
Fatal编程技术网
  • r/
  • R 添加前导空格，使列中所有单元格的字符长度等于最大长度

R 添加前导空格，使列中所有单元格的字符长度等于最大长度

r

R 添加前导空格，使列中所有单元格的字符长度等于最大长度,r,R,我想在v2中添加前导空格，以便v2的所有单元格的字符长度均为maxchar。我正在尝试将不同的绘图合并到一个显示器中，这将有助于解决我遇到的对齐问题 dat <- data.frame(v1=rep("item", 6), v2=c(rep("10", 2), rep("100", 2), rep("1000", 2)) ) d

我想在
v2
中添加前导空格，以便
v2
的所有单元格的字符长度均为
maxchar
。我正在尝试将不同的绘图合并到一个显示器中，这将有助于解决我遇到的对齐问题

dat <- data.frame(v1=rep("item", 6),
                  v2=c(rep("10", 2),
                       rep("100", 2),
                       rep("1000", 2))
                  )
dat[2] <- as.character(dat[,2])
maxchar <- max(nchar(dat[,2]))

dat我们可以使用
格式


dat$v2 <- format(dat[,2], width = maxchar, justify = "right")
dat$v2
#[1] "  10" "  10" " 100" " 100" "1000" "1000"



dat$v2您可以使用
stringi
软件包：


stringi::stri_pad_left(dat$v2, nchar(max(dat$v2)), pad = " ")



它将根据最大值的长度添加剩余的空格。
dat$v2 Solid，@NateDay。

stringi::stri_pad_left(dat$v2, nchar(max(dat$v2)), pad = " ")