我想在字符串中删除长度小于3的单词.例如,我的输入是
str<- c("hello RP have a nice day")
Run Code Online (Sandbox Code Playgroud)
我想要我的输出
str<- c("hello have nice day")
Run Code Online (Sandbox Code Playgroud)
请帮忙
我的输入是
a<-c("aa_bbb_cc_ddd","ee_fff_gg_hhh")
b<-c("a","b")
df<-data.frame(cbind(a,b))
Run Code Online (Sandbox Code Playgroud)
我希望我的输出是
a<-c("aa_bbb-cc_ddd","ee_fff-gg_hhh")
b<-c("a","b")
df<-data.frame(cbind(a,b))
Run Code Online (Sandbox Code Playgroud)
请帮忙
如何检查字符串中是否只有空格?
我想在if()声明中使用条件.
例如,
str<-" "
#check if str has only white spaces? example usage
if(str != empty)...
Run Code Online (Sandbox Code Playgroud) 我有以下字符串:
str<-c("hello(world(howr u doin")
Run Code Online (Sandbox Code Playgroud)
我想删除单词"hello(来自字符串的世界(howr).我想要我的输出
str2<-c("u doin")
Run Code Online (Sandbox Code Playgroud)
我通过使用获得的错误
gsub("hello(world(howr","", str)
Run Code Online (Sandbox Code Playgroud)
是:表达无效,原因'缺失')''
请注意,我不会在字符串的迭代中使用此函数,我们无法说出字符串中的"(")位置.因此,我会请求您提供全局解决方案.谢谢.另外,我会请求您要注意的是,字符串中要删除的单词在不同的时间可能会有所不同.所以我想要一个正则表达式,它告诉忽略要删除的单词中特殊字符的含义.
这是一个现实世界的情况
library(stringr)
library(NLP)
library(openNLP)
text_sa<-as.String("`$%`$> http://t.co/W9wDz8yhZE @AshramOrg @villan_TKRrength! #WeSupport_`$8`$(`$>`$$`$(_`$8`$`$8`% ")
removalwords<-c("#WeSupport_`$8`$(`$>`$$`$(_`$8`$\002`$8`%", "@AshramOrg")
for(k in 1:length(removalwords)){
text_sa <- gsub(removalwords[k], "", text_sa)
}
Run Code Online (Sandbox Code Playgroud)
我的预期产量是
text_sa<-as.String("`$%`$> http://t.co/W9wDz8yhZE @villan_TKRrength!")
Run Code Online (Sandbox Code Playgroud) 我和我一起有几个地方的纬度和逻辑信息.这是一个示例:
lat<-c(17.48693,17.49222,17.51965,17.49359,17.49284,17.47077)
long<-c(78.38945,78.39643,78.37835,78.40079,78.40686,78.35874)
Run Code Online (Sandbox Code Playgroud)
我想以某种顺序绘制这些位置(比如上面向量中的第一个元素的lat-long组合将是起点,我需要以相同的顺序行进到最后一个位置),并在R中进行谷歌地图指示.我发现有一个谷歌地图api,我可以从中获取指定位置的谷歌地图截图,在它上面我们需要绘制线条来连接它们.但我需要的是谷歌地图驾驶方向连接位置(而不是ggplot线).请帮忙.
我的意见是
a<-c(1,2,3,4)
b<-c(1,2,4,8)
df<-data.frame(cbind(a,b))
Run Code Online (Sandbox Code Playgroud)
我的输出应该是
a<-c(1,2,3,4)
b<-c(1,2,4,8)
d<-c(1,4,12,32)
df<-data.frame(cbind(a,b,c))
Run Code Online (Sandbox Code Playgroud)
我可以简单地说df $ a*df $ b请帮忙.我遇到了重复问题.它们以矩阵形式增加,并且还存在不同长度列的问题.
说我有以下数据帧
x <- c("p1","p2","p3","p4","p5","p6","p7","p8","p9","p10")
y <- c(1,4,3,5,5,7,2,2,6,8)
df <- data.frame(x,y)
Run Code Online (Sandbox Code Playgroud)
说x代表球员并y代表目标.比如说,我想要所有目标总和为10的玩家子集
{p1,p3,p9},{p3,p6},{p7,p8,p9}...
Run Code Online (Sandbox Code Playgroud) 我通过控制台在python中安装了facebook模块
pip install facebook-sdk
Run Code Online (Sandbox Code Playgroud)
然后注册到facebook api获取app_id和app_secret.I我没有在下面透露它们.
import facebook
app_id = '00000'
app_secret = 'xxxx'
access_token = facebook.get_app_access_token(app_id,app_secret)
Run Code Online (Sandbox Code Playgroud)
当我执行它来获取access_token时,我的python控制台抛出以下错误:
Traceback (most recent call last):
File "<ipython-input-18-0dfc0fd92367>", line 1, in <module>
access_token = facebook.get_app_access_token(app_id,app_secret)
AttributeError: 'module' object has no attribute 'get_app_access_token'
Run Code Online (Sandbox Code Playgroud)
请帮忙.
r ×7
regex ×4
string ×4
gsub ×3
dataframe ×2
facebook ×1
ggmap ×1
google-maps ×1
if-statement ×1
python ×1
replace ×1
rgooglemaps ×1
trim ×1
whitespace ×1