简体   繁体   中英

How to create a vector of character strings using a loop?

I am trying to create a vector of character strings in R using a loop, but am having some trouble. I'd appreciate any help anyone can offer.

The code I'm working with is a bit more detailed, but I've tried to code a reproducible example here which captures all the key bits:

vector1<-c(1,2,3,4,5,6,7,8,9,10)
vector2<-c(1,2,3,4,5,6,7,8,9,10)
thing<-character(10)


for(i in 1:10) {
  line1<-vector1[i]
  line2<-vector2[i]
  thing[i]<-cat(line1,line2,sep="\n") 
}

R then prints out the following:

1
1

Error in thing[i] <- cat(line1, line2, sep = "\n") : 
  replacement has length zero

What I'm trying to achieve is a character vector where each character is split over two lines, such that thing[1] is

1
1

and thing[2] is

2
2

and so on. Does anyone know how I could do this?

cat prints to the screen, but it returns NULL - to concatenate to a new character vector, you need to use paste :

  thing[i]<-paste(line1,line2,sep="\n") 

For example in an interactive terminal:

> line1 = "hello"
> line2 = "world"
> paste(line1,line2,sep="\n") 
[1] "hello\nworld"
> ret <- cat(line1,line2,sep="\n") 
hello
world
> ret
NULL

Though note that in your case, the entire for loop could just be replaced with the more concise and efficient line:

thing <- paste(vector1, vector2, sep="\n")
#  [1] "1\n1"   "2\n2"   "3\n3"   "4\n4"   "5\n5"   "6\n6"   "7\n7"   "8\n8"  
#  [9] "9\n9"   "10\n10"

The technical post webpages of this site follow the CC BY-SA 4.0 protocol. If you need to reprint, please indicate the site URL or the original address.Any question please contact:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM