سؤال
أحاول إنشاء R API لـ Stackoverflow. الناتج gzipped. فمثلا:
readLines("http://api.stackoverflow.com/0.9/stats/", warn=F)
[1] "\037‹\b"
[2] "\030\002úØÛy°óé½\036„iµXäË–[<üt—Zu[\\VmÎHî=ÜÛݹ×ýz’Í.äûû÷>ý´\a\177Ýh÷\017îÝÛÙwßÚáÿþ«¼þý\027ÅrÝæÔlgüÀëA±\017›ìŽï{M¤û.\020\037�Ë\"¿’\006³ì\032„Úß9¸ÿ`¼ç÷³*~ÿKêˆð¡\006v¦ð²ýô£�ñÃ�ì+ôU�_\026滽�]êt¼·?ÞûÈ4ù%\016~S0^>àe¶ÀG\037½n³éÛôKê缬®‚\016Êê¢úý×u‰fó¶]=º{·aΚŽ—y{·©î\026‹‹»h5^-/‚W1 |9[UŲõ^§�Ç"
[3] ":¬´¿1M\177ð\"0íö¹ñ…YÞLëbÕ*!~â\027\036§çU�®êê¢ÎˆµhòýæÅ´Zn\036S¶Z•ùv[§óm´î�"
[4] "Í™t˪^d¥£·üÂ?¾ÿ\033'¿$ù\177"
هل هناك طريقة جيدة ل Gunzip في R ، دون كتابة الإخراج لتقديمه ، و Gunzip'ing ، وقراءته مرة أخرى؟
المحلول
يمكنك أن تفعل:
conn <- gzcon(url("http://api.stackoverflow.com/0.9/stats/"))
data <- readLines(conn)
نصائح أخرى
محاولة:
p <- gzcon(url("http://api.stackoverflow.com/0.9/stats/"))
readLines(p)
من الناحية المثالية ، يجب أن نخبر الخادم أنه يمكننا التعامل مع محتوى Gzipped ، واكتشاف من رؤوس HTTP أن المحتوى قد تم ترميز GZIP فعليًا ثم فك ضغطه فقط إذا كان كذلك. يمكن لمكتبة Rcurl القيام بذلك:
library(Rcurl)
getURL("http://api.stackoverflow.com/0.9/stats/",
.opts=list(encoding="identity,gzip")
لا تنتمي إلى StackOverflow