如何将打印在控制台上的值存储为矢量？

Posted 2021-04-02

假设我有以下代码：

x <- 1
repeat
{
  x <- x+1
  print(x)
  if (x>10)
  {
    break
  }
}

当我运行它时，x的值增加1，并且此x值将打印到控制台上，直到x的值大于10。我在控制台上打印了我想要的所有x值。但是，我想将这些值存储为矢量。我该怎么做？

答案

 x<-1
 vec<-c()
 while(x<11){
   x<-x+1
   vec<-c(vec,x)
 }
 vec
 [1]  2  3  4  5  6  7  8  9 10 11

另一答案

您可以稍微修改您的代码：

x <- 1
y <- NULL
repeat
{
  x <- x+1
  print(x)
  y <- c(y, x)
  if (x>10)
  {
    break
  }
}

另一答案

我不知道你为什么选择这个过程来生成这样的向量，但我遵循@ Moody_Mudskipper的逻辑。你应该使用像x <- 2:11或x <- seq(2, 11, by = 1)这样简单的东西。

看看seq()功能