我的名为'dats'的对象是网络抓取产品;
dats <- read.table("http://...", skip = 11, nrows = 26, header = T, fill = T)
> head(dats)
V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12
1 ==== ======= === === === === === ==== ======= ======= ======= ============
2 WMAU 08/0000 26 24 89 0 0 10.0 FEW010 SCT140 BKN270
3 WMAU 07/2300
4 WMAU 07/2200
5 WMAU 07/2100
6 WMAU 07/2000
> tail(dats)
V1 V2 V3 V4 V5 V6 V7 V8 V9 V10 V11 V12
21 WMAU 07/0500 33 26 67 40 3 10.0 FEW020 SCT140 BKN270
22 WMAU 07/0400 32 28 79 40 2 10.0 FEW020 BKN270
23 WMAU 07/0300 30 27 84 30 1 10.0 FEW020 BKN270
24 WMAU 07/0200 29 28 94 260 2 10.0 FEW020 BKN270
25 WMAU 07/0100 28 25 84 250 1 8.0 FEW020 SCT140 BKN270
26 WMAU 07/0000 26 25 94 240 1 7.0 FEW010 BKN280
save(dats, file = paste0(getwd(),"/", stat,"/", year,".txt"))
但是在文本文件中它结果是......
‹ ÅWÉnÛ0¥DË[îkþ¡®H/’>t½í!Mé\Ô99
àíµ_Ûψ;´9#Žj«„&žùƲ¨÷8C|ôîDwOºBˆPÈ0¡Úá#
ѱÁ·ùÕ¥òðŒ0nÎÛkþ;˜–ærñc±5âþæ¬S8…ùìÓ믹«¢Óåü/¢©Îæ§W+`×9Sv|xxx
起初我希望它可能是因为languange''dats'开始阅读〜===== =====这条虚线,但是结果相同,即使我改变了跳过整数,加=我的表格对齐需要== ===。为什么会发生这种情况,是缺少连接还是我的save()参数丢失了?谢谢。