unlist
and wrap it in data.frame
data.frame(col = unlist(df), row.names = NULL)
# col
#1 A
#2 1
#3 B
#4 4
#5 C
#6 3
#7 D
#8 3
Or making it as tibble
library(tibble)
tibble(col = unlist(df))
# col
# <fct>
#1 A
#2 1
#3 B
#4 4
#5 C
#6 3
#7 D
#8 3
Another option mentioned by @Sotos is stack
but it needs columns of class characters
df[] <- lapply(df, as.character)
stack(df)[1]
data
df <- read.table(text = "A B C D
1 4 3 3")
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…