小编dax*_*x90的帖子

我的目的是使用R来查询google api.我有一个地址和名称列表(属于商店,餐馆等),我需要存储每个地址和名称:

"纬度","经度","商业类型"

我的想法是使用google place api:

- 使用文本搜索请求搜索地址以存储纬度经度

https://maps.googleapis.com/maps/api/place/textsearch/xml?query=address&key=AddYourOwnKeyHere

-则使用雷达搜索请求搜索的名称附近的纬度 ê 经度.所以我得到了ID_place

https://maps.googleapis.com/maps/api/place/radarsearch/json?location=latitude,longitude&radius=1&keyword=name&key=AddYourOwnKeyHere

- 感谢ID_place,我查询地方详细信息请求以获取有关业务类型的详细信息(例如"类型":["food"])

https://maps.googleapis.com/maps/api/place/details/json?placeid=ID_place&key=AddYourOwnKeyHere

我很高兴使用谷歌API,也许不是最有效的方法.但我需要考虑一下: - 有时候地址不完整(有时候我的公民号码丢失了) - 总是名字是正确的(有时我有缩写)

我需要了解一些事情:

• - 如果这是最好的方法
• - 如何使用R查询这些Google API
• - 如何处理json输出

我正在尝试为不同的群体创建箱形图.我想在3个水平带中为背景着色.中心区域,其中所有观察结果都接近整体平均值

平均值(重量)-0.5 <x <平均值(重量)+0.5

其他2个频段是下方和上方.

Theese是我的情节

library(ggplot2)
bp <- ggplot(data=PlantGrowth, aes(x=group, y=weight, fill=group)) + geom_boxplot()
bp

我试图在空间上绘制连续变量.我看到这个例子得到了我需要的相同结果:

library("MASS")
library("ggplot2")
library(reshape2) 

DB<-melt(volcano)
ggplot(DB, aes(x=Var1, y=Var2, fill=value)) +geom_tile()

所以我做了我的数据:

library(repmis)
url<-"https://www.dropbox.com/s/4m5qk32wjgrjq40/dato.RDATA"
source_data(url)

library(ggplot2)
ggplot(dato,aes(y=variable,x=y,fill=value))+geom_tile()

那好极了.但我的"x"和"y"是距离空间点的公里距离(东和北).我在纬度和经度上改变了这些.但现在我的情节不起作用!

ggplot(dato,aes(y=lat,x=long,fill=value))+geom_tile()

我不明白为什么.无论如何绘制我的数据像点,结果非常相似:

ggplot(dato,aes(y=lat,x=long,fill=value))+geom_point()
ggplot(dato,aes(y=variable,x=y,fill=value))+geom_point()

我正在尝试创建一个闪亮的R应用程序.我有一些麻烦,在单选按钮中显示欧元符号(并将其返回).我尝试过不同版本的代码:

library(shiny)
runApp(list(
ui= navbarPage(title = 'shoe euro',
radioButtons('var', 'var',  
c("INCOME_MGL",
"INCOME_MGL€",
"INCOME_MGL€",
"INCOME_MGL€",
"INCOME_MGL\u20ac")     
                        )),
 server=function(input, output, session) {
  }))

但"€"并未出现在网页中.此外,如果我选择第二个选项,页面将返回错误:

"Error in fromJSON(content, handler, default.size, depth, allowComments,  : 
  invalid JSON input"

我有一个 ";" 分隔文件:

aa;;;;aa
rgg;;;;fdg
aff;sfg;;;fasg
sfaf;sdfas;;;           
ASFGF;;;;fasg
QFA;DSGS;;DSFAG;fagf

我想用一个替换缺失的值来处理它\N.结果应该是:

aa;\N;\N;\N;aa
rgg;\N;\N;\N;fdg
aff;sfg;\N;\N;fasg
sfaf;sdfas;\N;\N;\N         
ASFGF;\N;\N;\N;fasg
QFA;DSGS;\N;DSFAG;fagf

我正在尝试使用sed脚本:

sed "s/;\(;\)/;\\N\1/g" file1.txt  >file2.txt

但我得到的是

aa;\N;;\N;aa
rgg;\N;;\N;fdg
aff;sfg;\N;;fasg
sfaf;sdfas;\N;;         
ASFGF;\N;;\N;fasg
QFA;DSGS;\N;DSFAG;fagf