powered by
getletter(x)
x<-c("25 30 15S","34 45 12E") getletter(x)
Run the code above in your browser using DataLab