导入所有表
除了 users，我们还需要 tweats 和 comments 表。不过，如果为数据库中的每个表分别调用 dbReadTable()，代码会大量重复。还记得 lapply() 函数吗？这里也可以用！连接对象已经为您写好，同时还提供了向量 table_names，其中包含数据库中所有表的名称。
本练习是课程的一部分
R 数据导入进阶
练习说明
- 完成
lapply()调用，用一次调用导入users、tweats和comments三个表。结果将是一个数据框列表，存储在变量tables中。 - 打印
tables，检查是否正确。
交互式实操练习
通过完成这段示例代码来试试这个练习。
# Load the DBI package
library(DBI)
# Connect to the MySQL database: con
con <- dbConnect(RMySQL::MySQL(),
dbname = "tweater",
host = "courses.csrrinzqubik.us-east-1.rds.amazonaws.com",
port = 3306,
user = "student",
password = "datacamp")
# Get table names
table_names <- dbListTables(con)
# Import all tables
tables <- lapply(___, ___, conn = con)
# Print out tables