View source: R/DSD_ReadWebService.R
DSD_ReadWebService | R Documentation |
Reads from a web service that published an operation called
get_points
which takes a parameter n
and returns n
data points in CSV or json
format. The request is
retried with httr::RETRY()
if it fails the first time.
DSD_ReadWebService(url, verbose = FALSE, ...)
url |
endpoint URI address in the format |
verbose |
logical; display connection information. |
... |
further arguments are passed on to |
A stream::DSD object.
Other WebService:
DSC_WebService()
,
publish_DSC_via_WebService()
,
publish_DSD_via_WebService()
Other dsd:
DSD_ReadSocket()
,
publish_DSD_via_Socket()
,
publish_DSD_via_WebService()
# find a free port
port <- httpuv::randomPort()
port
# create a background DSD process sending data to the port
rp1 <- publish_DSD_via_WebService("DSD_Gaussians(k = 3, d = 3)", port = port)
## use json for the transport layer instead of csv
# rp1 <- publish_DSD_via_WebService("DSD_Gaussians(k = 3, d = 3)",
# port = port, serialize = "json")
rp1
# create a DSD that connects to the web service
dsd <- DSD_ReadWebService(paste0("http://localhost", ":", port))
dsd
get_points(dsd, n = 10)
plot(dsd)
# end the DSD process. Note: that closing the connection above
# may already kill the process.
rp1$kill()
rp1
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.