I hereby claim:
- I am neekro on github.
- I am martinsmira (https://keybase.io/martinsmira) on keybase.
- I have a public key ASB0709e0zKQo8-ANVEjKFMA_6_RuS-7PIa7DGS8veeI2Qo
To claim this, I am signing this object:
I hereby claim:
To claim this, I am signing this object:
library(shiny) | |
shinyServer(function(input, output) { | |
# Potrebne vypocty | |
SEM1 <- reactive({ | |
15 * sqrt(1 - as.numeric(input$reliability1)) | |
}) |
library(shiny) | |
shinyServer(function(input, output) { | |
# Potrebne vypocty | |
posteriorMean <- reactive({ | |
SEM1 <- 15 * sqrt(1 - as.numeric(input$reliability1)) | |
SEM2 <- 15 * sqrt(1 - as.numeric(input$reliability2)) | |
precSD <- 1 / 15^2 | |
precSEM1 <- 1 / SEM1^2 |