|
#去掉$,即完成全部標(biāo)準(zhǔn)化 # out_thpr第⑤篇中找 outc_demoney <- out_thpr
%>% mutate(outc_cod_demoney = str_remove_all(.$outc_cod, "\\$")) %>% select(-outc_cod) %>% rename(outc_cod = outc_cod_demoney) #輸出最終清洗數(shù)據(jù) #注意替換自己的路徑 write_csv(outc_demoney,
"outc_demoney.csv") |
|
|
來(lái)自： 醫(yī)燈 > 《西醫(yī)學(xué)》
