The rnbp package is an R wrapper for the National Bank of Poland API:https://api.nbp.pl/
The rnbp package is available on CRAN, you can install it with:
install.packages("rnbp")You can install the the development version of rnbp fromGitHub with:
# install.packages("devtools")devtools::install_github("szymanskir/rnbp")library(rnbp)library(ggplot2)## Retrieve current C exchange rate tableresponse<-get_current_exchangerate_table("C")## Retrieve content from the responsecurrent_exchangerate_table<- response$content$rates[[1]]ggplot(current_exchangerate_table,aes(x = code,y = bid,fill = code))+geom_bar(stat ="identity")
## Retrieve last 20 exchange rates for euroseuros_response<-get_last_n_exchangerates("A","EUR",20)## Retrieve last 20 exchange rates for eurosdollars_response<-get_last_n_exchangerates("A","USD",20)## Retrieve rates dataeuros_data<- euros_response$content$ratesdollars_data<- dollars_response$content$rates## Add currency code columnseuros_data$code<- euros_response$content$codedollars_data$code<- dollars_response$content$codecurrency_data<-rbind(euros_data, dollars_data)ggplot(currency_data,aes(x = effectiveDate,y = mid,col = code))+geom_line()+geom_point()
current_date<-Sys.Date()response<-get_goldprice_from_interval(current_date-90, current_date)ggplot(response$content,aes(x = data,y = cena))+geom_point()+geom_line()+geom_smooth(method ="loess",formula = y~ x)