Spatial Dataframe的地理位置特定推文集

Question

我正在使用twitteR包来提取一些地理位置的推文。以下是我的空间位置：

aa1 <- read.table(header=TRUE, text="
latitude longitude
30.27332 -97.74344
                   30.23302 -97.70345
                   30.27232 -96.70333
                   30.24332 -97.74342
                   30.27332 -97.89341
                   30.27342 -97.45349
                   ")
aa1
latitude longitude
30.27332 -97.74344
30.23302 -97.70345
30.27232 -96.70333
30.24332 -97.74342
30.27332 -97.89341
30.27342 -97.45349

我想运行一个简单的函数来自动提取推文。由于searchTwitter函数适用于字符串，我无法提取推文。这是我的代码：

library(twitteR)
library(ROAuth)
library(RCurl)

api_key <- ".."  
api_secret <- ".."  
access_token <- ".."  
access_token_secret <- ".."  
setup_twitter_oauth(api_key,api_secret,access_token,access_token_secret)

for (i in 1:length(aa1[,1])){
  tweets = searchTwitter('geocode:aa1[,1], aa1[,2], 20km',  n=10)
  dat <- data.frame(length(tweets))
  aa1[i,3] <- dat
}

geocode:aa1[,1], aa1[,2], 20km无法以字符串格式运行。有没有办法覆盖string/function问题？