Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/80.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_Prompt - Fatal编程技术网

在R中的提示符内显示值

在R中的提示符内显示值,r,prompt,R,Prompt,我已经搜索这个有一段时间了,还没有找到答案。希望你能帮助我: a <- readline(prompt="No. of attributes: ") lev <- c() i <- 0 while (i<a) { l <- readline(prompt="No. of levels in attribute i: ") l <- as.numeric(strsplit(l,",")[[1]]

我已经搜索这个有一段时间了,还没有找到答案。希望你能帮助我:

a <- readline(prompt="No. of attributes: ")
lev <- c()
i <- 0
while (i<a) {
  l <- readline(prompt="No. of levels in attribute i: ")
  l <- as.numeric(strsplit(l,",")[[1]])
  lev <- c(lev, l)
  i=i+1
}
a您的意思是“将提示值指定给‘i’”吗?这不管用吗?
(编辑)
看来你需要三个改变--

  • 使用
    paste0
    (它将原始文本与字符串变量连接起来,并带有“0”空格,即没有空格)
  • 您需要正确地将“l”赋值,以便提示递增
  • 您可能希望我从1开始,并更改
    i您的意思是“将提示值指定给'i'”吗?这不管用吗?
    (编辑)
    看来你需要三个改变--

  • 使用
    paste0
    (它将原始文本与字符串变量连接起来,并带有“0”空格,即没有空格)
  • 您需要正确地将“l”赋值,以便提示递增
  • 您可能希望我从1开始,然后更改您可以使用的
    i

    prompt=paste0("No. of levels in attribute ", i, ":")
    
    编辑:仅供参考,还有一个非常类似的
    粘贴
    函数,但在粘贴的字符串之间放置空格。如果要将字符串向量粘贴在一起,还可以查看
    collapse=
    参数以粘贴
    paste
    paste0

    可以使用

    prompt=paste0("No. of levels in attribute ", i, ":")
    
    编辑:仅供参考,还有一个非常类似的
    粘贴
    函数,但在粘贴的字符串之间放置空格。如果要将字符串向量粘贴在一起,还可以查看参数
    collapse=
    中的
    paste
    paste0