คือผมต้องการ scraping web เพื่อดึงข้อมูลเกี่ยวกับราคาทองคำจากเว็บ
https://money.sanook.com/economic/goldrate/
มานะครับ เพื่อมาทำข้อมูลให้อยู่ในรูปตาราง แล้วก็ทำการแสดงกราฟแท่งเทียน ว่าราคาทองคำในแต่ละวันเป็นยังไงบ้างนะครับ
แต่ตอนเขียนโค๊ตผมติดปัญหาตรงที่ทำยังไงให้ มันจัดอยู่ในรูปตารางนะครับ
(ปล.ถ้าเป็นภาษา Python ผมจะ import bs4 เข้ามาช่วยในการจัดรูปแบบ แต่นี้เป็นภาษา R เลยทำไม่ถูกเลยครับ)
********************รบกวนท่านเทพภาษา R ช่วยหน่อยครับ********************
อันนี้คือ Code ที่ผมลองเขียนดูนะครับ ซึ่งไม่ประสบผลสำเร็จ
library(RCurl)
library(XML)
html = getURL("
https://money.sanook.com/economic/goldrate/", followlocation = TRUE)
doc = htmlParse(html, asText=TRUE)
plain.text = xpathSApply(doc, "/html/body/div[3]/div[2]/div[1]/div/article[2]/table", xmlValue)
a = plain.text
b = gsub("\n\t","",a)
c = gsub("\t","",b)
d = gsub(" ","",c)
print(d)
อันนี้คือผลหลังจากการรัน Code
https://www.img.live/images/2019/05/04/Capture.png
tag ไม่ตรงหมวดหมู่ ขออภัยด้วยนะครับผม
(ภาษา R) ใครพอมีความรู้รบกวนช่วยหน่อยครับ
มานะครับ เพื่อมาทำข้อมูลให้อยู่ในรูปตาราง แล้วก็ทำการแสดงกราฟแท่งเทียน ว่าราคาทองคำในแต่ละวันเป็นยังไงบ้างนะครับ
แต่ตอนเขียนโค๊ตผมติดปัญหาตรงที่ทำยังไงให้ มันจัดอยู่ในรูปตารางนะครับ
(ปล.ถ้าเป็นภาษา Python ผมจะ import bs4 เข้ามาช่วยในการจัดรูปแบบ แต่นี้เป็นภาษา R เลยทำไม่ถูกเลยครับ)
********************รบกวนท่านเทพภาษา R ช่วยหน่อยครับ********************
อันนี้คือ Code ที่ผมลองเขียนดูนะครับ ซึ่งไม่ประสบผลสำเร็จ
library(RCurl)
library(XML)
html = getURL("https://money.sanook.com/economic/goldrate/", followlocation = TRUE)
doc = htmlParse(html, asText=TRUE)
plain.text = xpathSApply(doc, "/html/body/div[3]/div[2]/div[1]/div/article[2]/table", xmlValue)
a = plain.text
b = gsub("\n\t","",a)
c = gsub("\t","",b)
d = gsub(" ","",c)
print(d)
อันนี้คือผลหลังจากการรัน Code
https://www.img.live/images/2019/05/04/Capture.png
tag ไม่ตรงหมวดหมู่ ขออภัยด้วยนะครับผม