https://github.com/FvD/futureplumber
Using future with plumber to set up asynchronous api calls
https://github.com/FvD/futureplumber
Last synced: 3 months ago
JSON representation
Using future with plumber to set up asynchronous api calls
- Host: GitHub
- URL: https://github.com/FvD/futureplumber
- Owner: FvD
- Created: 2016-10-10T19:53:05.000Z (almost 9 years ago)
- Default Branch: master
- Last Pushed: 2016-10-10T20:11:36.000Z (almost 9 years ago)
- Last Synced: 2025-04-14T13:53:01.181Z (6 months ago)
- Language: R
- Size: 1.95 KB
- Stars: 14
- Watchers: 3
- Forks: 0
- Open Issues: 0
-
Metadata Files:
- Readme: README.Rmd
Awesome Lists containing this project
- jimsghstars - FvD/futureplumber - Using future with plumber to set up asynchronous api calls (R)
README
---
title: "Future Plumber"
output: github_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```
## Asynchronous API's with Plumber
Plumber does not have in-built features to handle calls to the endpoints asynchronously. And perhaps this is something that need not be handled by plumber directly, but instead can be handled by the [future](https://github.com/HenrikBengtsson/future) package. A huge benefit is that **future** can do much more than just handling code asynchronously.
So as a very basic and first example we implement this example from the future README in plumber
```{r}
library(future)
plan(multisession)
pid <- Sys.getpid()
pid
```
### Multiple pids
```{r}
a %<-% {
cat("Resolving 'a' ...\n")
Sys.getpid()
}
b %<-% {
cat("Resolving 'b' ...\n")
Sys.getpid()
}
c %<-% {
cat("Resolving 'c' ...\n")
Sys.getpid()
}
a
b
c
```
It is not possible to use the `%<-%` directly in plumber, it has to be placed inside a function, like so:
```{r}
in_a_function <- function(){
a %<-% {
cat("Resolving 'a' ...")
Sys.sleep(2)
cat("done\n")
current_pid <- Sys.getpid()
return(current_pid)
}
cat("Solved in pid: ", a)
}
```
And this is the basis for the first example in the folder [multiprocess], that uses `plan(multiprocess)` to handle all calls asynchronously (instantiates a new R process for each call).