我想通过data.frame的不同列(在列名中使用通用模式)迭代函数.对于data.frame的子集我使用这个有效的代码:
df[,grep("abc", colnames(df))]
但我不知道如何将我的函数f(x)应用于匹配此模式的所有列,使用for循环或lapply函数.
我正在使用的功能是:
compress= function(x) {
aggregate(df[,x,drop=FALSE],
list(hour = with(df,paste(dates(Time),
sprintf("%d:00:00",hours(Time))))),
sum,na.rm=TRUE)
}
其中df(数据框)和Time可以设置为变量本身,但目前我不需要这样做.
谢谢Giulia
我想从R中的数据帧的标题中删除空格,但我不知道如何仅对标题进行子集化.我的数据帧是由以下代码给出的df的tipe:
a <- c("a", "b")
b <- c(20, 30)
head <- c("d area", "f area")
df <- data.frame(a,b)
names(df) <- head
我想要的是一个带有修改标题的数据框,以便摆脱空格,因此结果将是一个数据帧,如下面代码给出的newdf:
a <- c("a", "b")
b <- c(20, 30)
head <- c("darea", "farea")
df <- data.frame(a,b)
names(df) <- head
非常感谢您的帮助
朱利亚
我想创建一个传单地图，在同一传单图例中同时包含圆形和正方形。
到目前为止，我已经使用了上一篇文章中的建议，并在闪亮的UI代码中添加了以下代码。
tags$style(type = "text/css", "html, body {width:100%;height:100%}",
".leaflet .legend i{
position: 'topleft';
border-radius: 50%;
width: 10px;
height: 10px;
margin-top: 4px;
}
")
这样，虽然图例中只有圆圈，但我想使用3种图例：1）实心圆，2）空圆圈（仅边框）和3）实心正方形。
如何使用R的传单制作这样的图例？