在使用'bind_rows（）之前，更改数据帧列表中所有列的数据类型`
我有一个数据帧列表，例如来自以下代码：在使用'bind_rows（）之前，更改数据帧列表中所有列的数据类型`,r,tidyverse,R,Tidyverse,我有一个数据帧列表，例如来自以下代码： "https://en.wikipedia.org/wiki/List_of_accidents_and_disasters_by_death_toll" %>% rvest::read_html() %>% html_nodes(css = 'table[class="wikitable sortable"]') %>% html_table(fill = TRUE)
"https://en.wikipedia.org/wiki/List_of_accidents_and_disasters_by_death_toll" %>%
rvest::read_html() %>%
html_nodes(css = 'table[class="wikitable sortable"]') %>%
html_table(fill = TRUE)
dplyr:：bind_rows（）错误：无法合并。1$deations和。5$deations
（答案建议不起作用）
因此，我需要在使用行绑定之前转换数据类型。我希望在管道中使用它（tidyverse解决方案将是理想的），并且由于剩余项目的结构，不会在数据帧中循环，而是使用像lappy（，function（x）{lappy（x%>%mutate\u all，as.character）}这样的向量化对象（这不起作用）将所有值转换为字符
有人能帮我吗？您可以将所有列类更改为字符，并使用map\u df
将它们绑定在一起
library(tidyverse)
library(rvest)
"https://en.wikipedia.org/wiki/List_of_accidents_and_disasters_by_death_toll" %>%
rvest::read_html() %>%
html_nodes(css = 'table[class="wikitable sortable"]') %>%
html_table(fill = TRUE) %>%
map_df(~.x %>% mutate(across(.fns = as.character)))
# Deaths Date Attraction `Amusement park` Location Incident Injuries
# <chr> <chr> <chr> <chr> <chr> <chr> <chr>
#1 28 14 Feb… Transvaal Park (entire … Transvaal Park Yasenevo, Mosc… NA NA
#2 15 27 Jun… Formosa Fun Coast music… Formosa Fun Coast Bali, New Taip… NA NA
#3 8 11 May… Haunted Castle; a fire … Six Flags Great … Jackson Townsh… NA NA
#4 7 9 June… Ghost Train; a fire at … Luna Park Sydney Sydney, Austra… NA NA
#5 7 14 Aug… Skylab; a crane collide… Hamburger Dom Hamburg, (Germ… NA NA
# 6 6 13 Aug… Virginia Reel; a fire a… Palisades Amusem… Cliffside Park… NA NA
# 7 6 29 Jun… Eco-Adventure Valley Sp… OCT East Yantian Distri… NA NA
# 8 5 30 May… Big Dipper; the roller … Battersea Park Battersea, Lon… NA NA
# 9 5 23 Jun… Kuzuluk Aquapark swimmi… Kuzuluk Aquapark Akyazi, Turkey… NA NA
#10 4 24 Jul… Big Dipper; a bolt came… Krug Park Omaha, Nebrask… NA NA
# … with 1,895 more rows
库（tidyverse）
图书馆（rvest）
"https://en.wikipedia.org/wiki/List_of_accidents_and_disasters_by_death_toll" %>%
rvest:：read_html（）%>%
html_节点（css='table[class=“wikitable sortable”]”）%>%
html_表格（fill=TRUE）%>%
map_df（~.x%>%变异（跨（.fns=as.character）））
#死亡日期景点`游乐园`地点事故伤害
#
#2月1日28日14日…特兰斯瓦尔公园（整个…特兰斯瓦尔公园亚塞内沃，莫斯克…纳）
#6月2日15日27日…福尔摩沙欢乐海岸音乐…福尔摩沙欢乐海岸巴厘岛，新太平岛…娜娜
#5月3日8日11日…闹鬼的城堡；一场大火…六面旗帜伟大…杰克逊·汤什…娜娜
#6月4日7日9日…幽灵列车；澳大利亚悉尼卢纳公园发生火灾…NA
#8月5日7日14日…天空实验室；一只起重机相撞…汉堡汉堡大教堂，（细菌…NA NA）
#8月6日至13日…弗吉尼亚州卷轴；火灾…栅栏娱乐…悬崖边公园…NA NA
#6月7日6月29日…生态冒险谷Sp…华侨城盐田东区…NA
#5月8日5月30日…北斗七星；滚轴…巴特西公园-巴特西，伦敦
#6月9日5日23日…库祖鲁克水上公园游泳池…库祖鲁克水上公园阿卡亚齐，土耳其…纳纳
#7月10日4日24日…北斗七星；晴天霹雳降临…内布拉斯加州奥马哈克鲁格公园…北美
#…还有1895行
这是否回答了您的问题？表%unique（）