小编hrb*_*str的帖子

我正在用 ggplot 制作一个 choropleth，我试图在框架中为我的图例添加标签，但 R 一直将标签值放在科学记数法中。有谁知道解决这个问题的方法？当我的标签值较小时，我有以下代码可以正常工作，但我需要包括范围。

 ta<- quantile(look13$capcpi,c(0, 0.2, 0.4, 0.6, 0.8, 1.0) )
 t<- c('$35,141-$37,916', '$37,916-$40,236','$40,236-$43,364','$43,364-$45,280', '$45,280-$59,688')
 look13$capcpi_q<- cut(look13$capcpi,ta, lables= t, include.lowest = TRUE)
 lookmap<- merge(st,look13, by.x='id', by.y= 'area')
 realpi<- ggplot(lookmap, aes(x=long, y=lat, group=group, fill= capcpi_q))+
          geom_path() + geom_polygon(color='black')+ 
          scale_fill_manual(values= pal)+ theme_clean()

我有一个请求,在curl这样的

curl -H "Content-Type:application/json"             \
     -X GET 127.0.0.1:8084/clusterpredict/byheaders \
     -v                                             \
     -b "text1"                                     \
     -A "text2"

如何在R中执行相同的操作RCurl或httr在R中执行相同的操作？

想知道是否有人可以帮我解决这个问题.我在下面有这些数据.

[1] "Compared with 3 months earlier . . . . . . . . 123 (100.0) 11 (8 .9 60 (48. 8) 48 (39.0) 4 (3.3) . . . . . . . . . . . . . ."       
[2] "Compared with 3 months earlier . . . . . . . . 124 ( 100.0) 18 (14. 5) 60 (48.4) 42 (33 .9) 4 (3. 2) . . . . . . . . . . . …

我正在尝试抓取此网站：

http://www.racingpost.com/greyhounds/result_home.sd#resultDay=2015-12-26&meetingId=18&isFullMeeting=true

通过rvestR中的包装。

不幸的是，似乎rvest无法通过CSS选择器识别节点。

例如，如果我尝试提取每个表的标题（坡度，奖赏，距离）中的信息，其CSS选择器为“ .black”，然后运行以下代码：

URL <- read_html("http://www.racingpost.com/greyhounds/result_home.sd#resultDay=2015-12-26&meetingId=18&isFullMeeting=true")
nodes<-html_nodes(URL, ".black") 

节点显示为空列表，因此不会刮任何东西。

我只是在R中玩ggplot2,语法就像

geom_map(data=world, map=world
aes(x=long, y=lat, map_id=region),
color="white", fill="#7f7f7f", size=0.05, alpha=1/4)

这给了我世界地图,是否有可能只将英国地图作为背景地图？非常感谢Peddie

我有一些代码,因为升级到最新的ggplot2版本后不再有效.它已经从12月初开始了,我想知道是否有其他人有同样的问题.

以下代码用于完美地工作:

gLM1 <- ggplot(data = raw.data, aes(x = predict.lm1, y = (Sales_C-predict.lm1))) +
geom_point(alpha = I(0.75), colour = myPal[1]) +
geom_smooth(span = 0.75, degree = 1, size = 1.25, se = FALSE, colour = myPal[5]) +
labs(list(title = "Fitted vs Residuals", x = "Fitted Values", y = "Residuals")) +
theme_bw() + myGgTheme
gLM1

现在突然回来了:

错误:未知参数:度

如果我从geom_smooth中删除degree参数,它会再次起作用.同样,此代码用于运行,现在失败:

gclus <- ggplot(data = raw.data, aes(x = oOrollingSD, y = OnTarget, colour = clusterGroup, size = Quota)) +
xlim(4.2, 11.8) +
geom_point(alpha = …

相当新的R并且使用该string_count函数来检测多个未知的单词并且包含在单独的向量中.

现在,我知道如何使用以下代码检测单个模式实例:

str_count(mydf$string, "Apples")

我想要做的是从一个矢量中检测多个单词(例如"苹果","梨子","橙子"等),该矢量本身是从另一个数据帧创建的(例如通过使用Uniques<-unique(mydf1$words)).

这里的关键是,出现的单词mydf1$words完全取决于首先上传到R的数据,因为这将从数据集更改为数据集.

答案可能很简单,但对于我的生活,我似乎无法解决它!

我正在关注ggplot文档中的一个示例

这是代码:

library(plyr)
coefs <- ddply(mtcars, .(cyl), function(df) {
  m <- lm(mpg ~ wt, data=df)
  data.frame(a = coef(m)[1], b = coef(m)[2])
})

p <- ggplot(mtcars, aes(x = wt, y=mpg), . ~ cyl) + geom_point()
p + geom_abline(data=coefs, aes(intercept=a, slope=b))

但是,我想只使用'ablines'相同的图形!没有点!试:

p <- ggplot(mtcars, aes(x = wt, y=mpg), . ~ cyl)
p + geom_abline(data=coefs, aes(intercept=a, slope=b))

给我一个错误:"参数"env"缺失,没有默认值'

我使用R在图表中绘制了两个点,并用箭头连接点.如何在箭头上添加文本.(固定文本)我的代码如下:

x<-y<-1
new.x<-2
new.y<-2  
Text<-"Direction"
plot(x, y, xaxt='n',yaxt='n',cex=10,pch=19,xlim=c(0,4), ylim=c(0,3))
points(new.x,new.y,cex=10,pch=19)
arrows(x, y, new.x, new.y, col = "orange",lwd=4,lty=4)

在箭头上我想在箭头上添加一个Text对象("Direction").

图像如下:

我有一个由Tweets（只是消息文本）组成的向量，我正在清理这些向量以用于文本挖掘。我removePunctuation从这样的tm包中使用过：

clean_tweet_text = removePunctuation(tweet_text)

这样就产生了一个矢量，除了撇号外，所有标点符号都从文本中删除了，因为没有注册带有撇号的单词，这破坏了我的关键字搜索。例如，我的一个关键字是，climate但是如果有一条推文'climate，则不会被计算在内。

如何删除向量中所有的撇号/单引号？

这是dput可复制示例的标头：

c("expert briefing on climatechange disarmament sdgs nmun httpstco5gqkngpkap", 
"who uses nasa earth science data he looks at impact of aerosols on climateamp weather httpstcof4azsiqkw1 https…", 
"rt oddly enough some republicans think climate change is real oddly enough… httpstcomtlfx1mnuf uniteblue https…", 
"better dead than red bill gates says that only socialism can save us from climate change httpstcopypqmd1fok", 
"i see …