R_Language 板


LINE

※ 引述《hanglong (小焕)》之铭言: : [问题类型]: : 程式谘询(我想用R 做某件事情,但是我不知道要怎麽用R 写出来) : [软体熟悉度]: : 新手(没写过程式,R 是我的第一次) : [问题叙述]: : 各位R版上的先进大家好 近期我在使用程式上 遇到一些比较奇怪的问题 : 原先使用程式上 都没有任何的异常 但近期因为电脑有些问题 需要重灌 : 我就把自己写的程式储存起来 想说重灌後 再重新下载R与R Studio : 灌好R後再重新下载需要的Package 但特别的是 原本可以跑的程式 : 就出现了Error 导致程式无法执行 以下为我的程式码 : [程式范例]: : library(gplots) : library(ggplot2) : library(SixSigma) : library(lubridate) : library(Cairo) : coat <- read.csv("C:\\Users\\rex\\Desktop\\coating.csv")*[m : #其中 coat$作业日 是日期的形式,例如:2018/12/27 : #coat$average.是浮点数 : #我想用这两个画图,X座标为日期,Y座标为数值 : ggsave(plot = ggplot(data = coat) + geom_point(aes(strptime(作业日, : "%Y/%m/%d"), average.1)), file = "X:\\趋势图.pdf", width = 15, height = 7, : device = cairo_pdf, family = "Song") : 但程式出现以下错误: : Error in dev(filename = filename, width = dim[1], height = dim[2], ...) : : unable to start device 'cairo_pdf' : In addition: Warning message: : In dev(filename = filename, width = dim[1], height = dim[2], ...) : : cairo error 'out of memory' : 在还无法解决此问题的情形下 我想说先画图 之後在解决储存的问题 : 因此将内容撷取出来: : ggplot(data = coat) + geom_point(aes(strptime(作业日, "%Y/%m/%d"), average.1)) : 此时出现另外的错误: : Error: Column `x` is a date/time and must be stored as POSIXct, not POSIXlt : 而以上的两个问题 在重灌之前是都不会出现 : 程式是可以顺利执行的 但是不晓得为什麽会出现这些错误 : 原本想说是不是有其他的Package我没有使用到 但是程式并没有出现看不懂函数的讯息 : 希望各位先进可以指点迷津 谢谢 : : [环境叙述]: : : R version 3.5.2 (2018-12-20) : Platform: x86_64-w64-mingw32/x64 (64-bit) : Running under: Windows >= 8 x64 (build 9200) : Matrix products: default : locale: : [1] LC_COLLATE=Chinese (Traditional)_Taiwan.950 LC_CTYPE=Chinese : (Traditional)_Taiwan.950 : [3] LC_MONETARY=Chinese (Traditional)_Taiwan.950 LC_NUMERIC=C : [5] LC_TIME=Chinese (Traditional)_Taiwan.950 : attached base packages: : [1] stats graphics grDevices utils datasets methods base : other attached packages: : [1] Cairo_1.5-9 lubridate_1.7.4 SixSigma_0.9-52 ggplot2_3.1.0 : gplots_3.0.1 : loaded via a namespace (and not attached): : [1] Rcpp_1.0.0 magrittr_1.5 MASS_7.3-51.1 munsell_0.5.0 : [5] xtable_1.8-3 colorspace_1.3-2 lattice_0.20-38 R6_2.3.0 : [9] rlang_0.3.0.1 stringr_1.3.1 plyr_1.8.4 : caTools_1.17.1.1 : [13] tools_3.5.2 qcc_2.7 grid_3.5.2 gtable_0.2.0 : [17] KernSmooth_2.23-15 withr_2.1.2 gtools_3.8.1 digest_0.6.18 : [21] lazyeval_0.2.1 tibble_1.4.2 crayon_1.3.4 bitops_1.0-6 : [25] testthat_2.0.1 labeling_0.3 stringi_1.2.4 gdata_2.18.0 : [29] compiler_3.5.2 pillar_1.3.1 scales_1.0.0 : : [关键字]: : : strptime ggsave ggplot2 感谢版上的大神帮忙解决了第一个问题 的确用as.POSIXct可以解决此问题 比较奇怪的是重灌之前不需要此程式码也可以顺利执行 至少已经解决了 谢谢 另外的问题 在今天的尝试 有一点了解问题的地方 程式码: ggsave(plot = ggplot(data = coat) + geom_point(aes(strptime(作业日, "%Y/%m/%d"), average.1)), file = "X:\\趋势图.pdf", width = 15, height = 7, device = cairo_pdf, family = "Song") 我有将路径改成file = "X:\\Chart.pdf" 就可以顺利执行 且图片中的中文可以正常显示 (因为要印出中文 当初才用device = cairo_pdf与family = "Song"的指令 所以我认为可能跟程式无法看懂输出位置的中文 但我另外也有尝试将device = cairo_pdf, family = "Song"都删掉 且路径保持中文 结果也可以执行 但图片内的中文就无法印出 (当初就是遇到中文无法印出 才用这些指令 所以将其删除 不意外会有这结果) 现在看起来 好像是指令与输出路径(中文)会有冲突 只是这个问题在重灌前也是不会发生的 希望藉由这些资讯 版上的先辈们 可以给些修正的建议 谢谢大家 -- 肝不好 肝若好 人生是黑白的 考卷是空白的 、 ﹐ ● ●b ▎ ●> ● ▌ ﹍﹍ 囧> 干... ▲ ■┘ ▎ ■ ▋ ︶■ 〈﹀ ∥ ▁▁∥ ▎ ﹀〉▊ 〈\ --



※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 125.227.245.73
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1545998390.A.870.html







like.gif 您可能会有兴趣的文章
icon.png[问题/行为] 猫晚上进房间会不会有憋尿问题
icon.pngRe: [闲聊] 选了错误的女孩成为魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一张
icon.png[心得] EMS高领长版毛衣.墨小楼MC1002
icon.png[分享] 丹龙隔热纸GE55+33+22
icon.png[问题] 清洗洗衣机
icon.png[寻物] 窗台下的空间
icon.png[闲聊] 双极の女神1 木魔爵
icon.png[售车] 新竹 1997 march 1297cc 白色 四门
icon.png[讨论] 能从照片感受到摄影者心情吗
icon.png[狂贺] 贺贺贺贺 贺!岛村卯月!总选举NO.1
icon.png[难过] 羡慕白皮肤的女生
icon.png阅读文章
icon.png[黑特]
icon.png[问题] SBK S1安装於安全帽位置
icon.png[分享] 旧woo100绝版开箱!!
icon.pngRe: [无言] 关於小包卫生纸
icon.png[开箱] E5-2683V3 RX480Strix 快睿C1 简单测试
icon.png[心得] 苍の海贼龙 地狱 执行者16PT
icon.png[售车] 1999年Virage iO 1.8EXi
icon.png[心得] 挑战33 LV10 狮子座pt solo
icon.png[闲聊] 手把手教你不被桶之新手主购教学
icon.png[分享] Civic Type R 量产版官方照无预警流出
icon.png[售车] Golf 4 2.0 银色 自排
icon.png[出售] Graco提篮汽座(有底座)2000元诚可议
icon.png[问题] 请问补牙材质掉了还能再补吗?(台中半年内
icon.png[问题] 44th 单曲 生写竟然都给重复的啊啊!
icon.png[心得] 华南红卡/icash 核卡
icon.png[问题] 拔牙矫正这样正常吗
icon.png[赠送] 老莫高业 初业 102年版
icon.png[情报] 三大行动支付 本季掀战火
icon.png[宝宝] 博客来Amos水蜡笔5/1特价五折
icon.pngRe: [心得] 新鲜人一些面试分享
icon.png[心得] 苍の海贼龙 地狱 麒麟25PT
icon.pngRe: [闲聊] (君の名は。雷慎入) 君名二创漫画翻译
icon.pngRe: [闲聊] OGN中场影片:失踪人口局 (英文字幕)
icon.png[问题] 台湾大哥大4G讯号差
icon.png[出售] [全国]全新千寻侘草LED灯, 水草

请输入看板名称,例如:BuyTogether站内搜寻

TOP