我正在尝试将所有在将 csv 导入字符时显示为逻辑的列转换为字符。
如果我调用每一列，这些代码如下所示，但我有 200 多列，所以它不可行。
library(stringi)
library(readr)
library(dplyr)
df <- read_csv("~/dataverified.csv",
col_types = cols(
Innovation = col_character(),
Tech = col_character(),
Music = col_character()))
这是一列的摘要 () 示例，下面是期望的输出
例如输入摘要
Innovation
Mode:logical
TRUE:403
NA's 45600
例如，每列的欲望输出摘要
Innovation
Length: 45900
Class:character
Mode:character