我试图将XML解析为R数据框,这个链接帮了我很多:
但我仍然无法弄清楚我的问题:
这是我的代码:
data <- xmlParse("http://forecast.weather.gov/MapClick.php?lat=29.803&lon=-82.411&FcstType=digitalDWML")
xmlToDataFrame(nodes=getNodeSet(data1,"//data"))[c("location","time-layout")]
step1 <- xmlToDataFrame(nodes=getNodeSet(data1,"//location/point"))[c("latitude","longitude")]
step2 <- xmlToDataFrame(nodes=getNodeSet(data1,"//time-layout/start-valid-time"))
step3 <- xmlToDataFrame(nodes=getNodeSet(data1,"//parameters/temperature"))[c("type="hourly"")]
Run Code Online (Sandbox Code Playgroud)
我想要的数据框是这样的:
latitude longitude start-valid-time hourly_temperature
29.803 -82.411 2013-06-19T15:00:00-04:00 91
29.803 -82.411 2013-06-19T16:00:00-04:00 90
Run Code Online (Sandbox Code Playgroud)
我被困在了xmlToDataFrame(),任何帮助都会非常感激,谢谢.
我需要做的是从数百个链接中读取数据,其中一些链接不包含任何数据,因此,这里的代码如下:
urls <-paste0("http://somelink.php?station=",station, "&start=", Year, "01-01&etc")
myData <- lapply(urls, read.table, header = TRUE, sep = '|')
Run Code Online (Sandbox Code Playgroud)
弹出一个错误,说"输入中没有行可用",我尝试使用"尝试",但是出现同样的错误,请帮助,谢谢.
我试过了:
seq(
from=as.POSIXct("2012-1-1 0", tz="UTC"),
to=as.POSIXct("2012-1-3 23", tz="UTC"),
by="hour"
)
Run Code Online (Sandbox Code Playgroud)
但是我只得到最后一天的1小时(0:00:00)而不是24小时,实际上一天中的任何一小时都只有一个小时(0:00:00),我确实想要2012-1 -4.
我已经创建了一个表输出并通过RMySQL连接到数据库,现在我需要向表添加索引,我四处搜索但没有找到我需要的R语言,请帮助。
该表的一个小示例如下所示:
mth <- c(rep(1:2,5))
day <- c(rep(10,5),rep(11,5))
hr <- c(3,4,5,6,7,3,4,5,6,7)
v <- c(3,4,5,4,3,3,4,5,4,3)
A <- data.frame(cbind(mth,day,hr,v))
Run Code Online (Sandbox Code Playgroud)
我需要的索引应包括:“mth”+“day”+“hr”。非常感谢!
我需要将角色日期"2008-1-1"变为数字20080101,但我得到的是200811,有人可以帮我吗?非常感谢你.这是我的代码:
year <- c(2008:2012)
mth <- c(1:5)
day <- c(1:5)
A <- data.frame(cbind(year,mth,day))
date.ch <- as.character(with(A, paste(year, mth, day, sep="-")))
date.n <- as.numeric(with(A, paste(year, mth, day, sep="")))
Run Code Online (Sandbox Code Playgroud)