.Rhistory

packrat::init()
packrat::set_opts(external.packages = c("RevoUtils"))
install.packages("shiny")
install.packages('shiny')
options(repos = c(CRAN = "https://mran.microsoft.com/snapshot/2019-04-15”))
)
""
';'
;0a
';'
""
options(repos = c(CRAN = "https://mran.microsoft.com/snapshot/2019-04-15"))
install.packages('shiny')
shiny::runApp('plate-long')
packageVersion('shiny')
shiny::runApp('plate-long')
shiny::runApp('well_index')
if(plate_type == '384-well'){
idx = well384_index()
} else {
stop('Do not recoginize plate type')
}
runApp('well_index')
runApp('well_index')
?DT::renderDataTable
runApp('well_index')
runApp('well_index')
well_convert = function(x, conv_dir, plate_type){
x = read.delim(text=x, sep='\t', header=FALSE)[,1]
x = as.character(x)
if(conv_dir == 'well2index'){
y = well2index(x, plate_type)
} else
if(conv_dir == 'index2well'){
y = index2well(x, plate_type)
} else{
y = x
}
df = data.frame(converted = y)
return(df)
}
shiny::runApp('barcodes')
runApp('PCR_success_fail')
runApp('plate-long')
runApp('unique')
runApp('unique')
runApp('unique')
runApp('unique')
runApp('Endpoint_rename')
runApp('well_index')
runApp('worklist_simple')
View(well2index)
shiny::runApp('plate-long')
runApp('plate-long')
runApp('plate-long')
runApp('plate-long')
runApp('plate-long')
runApp('plate-long')
?checkboxInput
runApp('plate-long')
runApp('plate-long')
runApp('plate-long')
runApp('plate-long')