Comment extraire un géocodage de tweet dans un paquet twitteR dans R

Ive été bricoler avec une fonction R, vous entrez dans le texte de la recherche, le nombre de sites de recherche, et le rayon autour de chaque site. Par exemple twitterMap("#rstats",10,"10mi")voici le code:

twitterMap <- function(searchtext,locations,radius){
require(ggplot2)
require(maps)
require(twitteR)
#radius from randomly chosen location
radius=radius
lat<-runif(n=locations,min=24.446667, max=49.384472)
long<-runif(n=locations,min=-124.733056, max=-66.949778)
#generate data fram with random longitude, latitude and chosen radius
coordinates<-as.data.frame(cbind(lat,long,radius))
coordinates$lat<-lat
coordinates$long<-long
#create a string of the lat, long, and radius for entry into searchTwitter()
for(i in 1:length(coordinates$lat)){
coordinates$search.twitter.entry[i]<-toString(c(coordinates$lat[i],
coordinates$long[i],radius))
}
# take out spaces in the string
coordinates$search.twitter.entry<-gsub(" ","", coordinates$search.twitter.entry ,
fixed=TRUE)
#Search twitter at each location, check how many tweets and put into dataframe
for(i in 1:length(coordinates$lat)){
coordinates$number.of.tweets[i]<-
length(searchTwitter(searchString=searchtext,n=1000,geocode=coordinates$search.twitter.entry[i]))
}
#making the US map
all_states <- map_data("state")
#plot all points on the map
p <- ggplot()
p <- p + geom_polygon( data=all_states, aes(x=long, y=lat, group = group),colour="grey",     fill=NA )
p<-p + geom_point( data=coordinates, aes(x=long, y=lat,color=number.of.tweets
)) + scale_size(name="# of tweets")
p
}
# Example
searchTwitter("dolphin",15,"10mi")

Il y a des gros problèmes que j'ai rencontré que je ne suis pas sûr de la façon de traiter avec. Tout d'abord, comme l'écrit le code des recherches de 15 généré de façon aléatoire lieux, ces lieux sont générés à partir d'une distribution uniforme sur le maximum de longitude à l'est des états-unis pour le maximum de l'ouest, et de la latitude plus au nord à l'extrême sud. Cela comprendra des endroits qui ne sont pas aux états-unis, dire juste à l'est du lac des bois, dans le minnesota au Canada. Je voudrais une fonction qui au hasard vérifie pour voir si le générés emplacement est aux états-unis et la jeter si elle ne l'est pas. Plus important encore, je voudrais pour rechercher des milliers d'endroits, mais twitter n'aime pas et me donne un 420 error enhance your calm. Alors peut-être il est préférable de rechercher toutes les quelques heures et lentement construire une base de données et supprimer les doublons de tweets. Enfin, si on choisit une distance sujet populaire, R donne une erreur comme Error in function (type, msg, asError = TRUE) :
transfer closed with 43756 bytes remaining to read. Je suis un peu perplexe sur la façon de contourner ce problème.