Nothing
Next, we propose a simple example in which we fit PheNorm to a simulated dataset.
knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(PheNorm)
Load the data
set.seed(1234) fit.dat <- read.csv("https://raw.githubusercontent.com/celehs/PheNorm/master/data-raw/data.csv")
Apply the PheNorm algorithm
fit.phenorm=PheNorm.Prob("ICD", "utl", fit.dat, nm.X = NULL, corrupt.rate=0.3, train.size=nrow(fit.dat)) head(fit.phenorm$probs)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.