R语言 输入了sample(按行筛选)为什么最终是按列筛选了三列呢?

最近在看r语言实战这本书, 在sample()函数这里,我尝试筛选3组观测,但是结果却出现了3组变量,我完全按照了书中的代码输入 ,害怕输入的有问题,又在网上找了别人的学习笔记复制粘贴,请大家帮忙看看!非常感谢!

manager <- c(1,2,3,4,5)
date <- c("10/24/08","10/28/08","10/1/08","10/12/08","5/1/09")
country <- c("US","US","UK","UK","UK")
gender <- c("M","F","F","M","F")
age <- c(32,45,25,39,NA)
q1 <- c(5,3,3,3,2)
q2 <- c(4,5,5,3,2)
q3 <- c(5,2,5,4,1)
q4 <- c(5,5,5,NA,2)
q5 <- c(5,5,2,NA,1)
leadership <- data.frame(manager,date,country,gender,age,
                         q1,q2,q3,q4,q5, stringsAsFactors = FALSE)    #创建data frame

mysample <- leadership[sample(1:nrow(leadership),3,replace = FALSE)]     #筛选3组数据
mysample
     

运行结果如下:

mysample
age country date
1 32 US 10/24/08
2 45 US 10/28/08
3 25 UK 10/1/08
4 39 UK 10/12/08
5 NA UK 5/1/09
没有报错

#我尝试过重启,或换一个电脑,也复制了网上其他人学习笔记的代码,结果都是这样,麻烦大家帮忙看看我应该如何修改