{"Package":"shiny.worker","Type":"Package","Title":"Delegate Jobs for Shiny Web Applications","Version":"0.0.1","Authors@R":"c(person(\"Pawe<82>\", \"Przytu<82>a\",\nemail = \"pawe<82>@appsilon.com\",\nrole = c(\"aut\")),\nperson(\"Dominik\", \"Krzemi<84>ski\",\nemail = \"dominik@appsilon.com\",\nrole = c(\"cre\")),\nperson(family = \"Appsilon\", role = c(\"cph\"))\n)","Description":"It allows you to delegate heavy computation tasks\nto a separate process, such that it does not freeze your Shiny app.","Encoding":"UTF-8","LazyData":"true","License":"MIT + file LICENSE","Imports":"future, shiny, R6","RoxygenNote":"7.1.1","Suggests":"testthat, covr","NeedsCompilation":"no","Packaged":"2021-01-19 10:05:26 UTC; dominik","Author":"Pawe<82> Przytu<82>a [aut],\nDominik Krzemi<84>ski [cre],\nAppsilon [cph]","Maintainer":"Dominik Krzemi<84>ski ","Repository":"CRAN","Date/Publication":"2021-01-21 11:00:02 UTC","repoType":"cran","tarballUrl":"ftp://cran.r-project.org/pub/R/src/contrib/shiny.worker_0.0.1.tar.gz","jsonAuthors":[{"name":"Pawe<82> Przytu<82>a","email":"pawe<82>@appsilon.com","maintainer":false},{"name":"Dominik Krzemi<84>ski","email":"dominik@appsilon.com","maintainer":true},{"name":" Appsilon","email":null,"maintainer":false}],"readme":"

\n\n# shiny.worker\n\n`shiny.worker` allows you to delegate heavy computation tasks to a separate process,\nsuch that it does not freeze your Shiny app.\n\n## How to install?\n\n```r\nremotes::install_github(\"Appsilon/shiny.worker\")\n```\n\n## Example\n\nSee live example [here](https://demo.appsilon.ai/apps/shiny-worker/).\n\n## How to use it?\n\nInitialise your worker at the beggining of your app.\n\n```r\nworker <- initialize_worker()\n```\n\nThen, in the server of your Shiny app define a promise that returns a reactive when your heavy job will be completed.\n\n```r\n\nmy_heavy_calculations <- function(args) {\n # ...\n args\n}\n\n# this reactive object is used to trigger the job start,\n# but also to pass parameters to the function\nreactive_arguments <- reactive({ \n input$start\n list(r = rnorm(1))\n})\n\n# resultPromise will be a reactive value with results returned by my_heavy_calculations\nresultPromise <- worker$run_job(\"job1\", my_heavy_calculations, args_reactive = reactive_arguments)\n\nresultPromise()$result # contains the result of the calculations\nresultPromise()$resolved # contains flag that informs whether the job has finished or not\n```\n\nSee more examples in the `examples/` folder.\n\n## Appsilon\n\n $\"\"$ \n\nAppsilon is the **Full Service Certified RStudio Partner**. Learn more\nat: [appsilon.com](https://appsilon.com) or get in touch: `dev@appsilon.com`.","jobInfo":{"package":"shiny.worker","version":"0.0.1","parsingStatus":"success","parserVersion":1,"parsedAt":"2021-01-21T12:31:55+0000"}}

Description

Usage

Arguments

Value

Examples