====== bts data ======
<code>
bts.names <- c("RM", "Jin", "Sugar", "J-hope", "Jimin", "v", "Jungkook")
bts.names
bts.ages <- c(26, 28, 27, 26, 25, 25, 23)
bts <- data.frame(name = bts.names, age = bts.ages)
bts
</code>

<code>
> bts.names <- c("RM", "Jin", "Sugar", "J-hope", "Jimin", "v", "Jungkook")
> bts.names
[1] "RM"       "Jin"      "Sugar"    "J-hope"   "Jimin"    "v"       
[7] "Jungkook"
> bts.ages <- c(26, 28, 27, 26, 25, 25, 23)
> bts <- data.frame(name = bts.names, age = bts.ages)
> bts
      name age
1       RM  26
2      Jin  28
3    Sugar  27
4   J-hope  26
5    Jimin  25
6        v  25
7 Jungkook  23
> 
</code>