diff --git a/.Rhistory b/.Rhistory new file mode 100644 index 0000000..e69de29 diff --git a/bon_wilsonrnaseq_hsc.R b/bon_wilsonrnaseq_hsc.R index 781b200..ed89ea2 100644 --- a/bon_wilsonrnaseq_hsc.R +++ b/bon_wilsonrnaseq_hsc.R @@ -27,7 +27,7 @@ fcdata = cdata[grepl('hsc', rownames(cdata)),] #select only HSC cells. fddata = ddata[grepl('hsc', rownames(ddata)),] #(3)Filtering expression data. -result = model_train(cdata=fcdata, ddata=fddata, bmodel=bmodel, istate=istate, preprocess=F, verbose=T) +result = model_train(cdata=fcdata, ddata=fddata, bmodel=bmodel, istate=istate, verbose=T) filename = 'bon_wilson_rnaseq_HSC_trained_bmodel.rda' save(result, file=filename) diff --git a/krum_wilson_grow_hsc.R b/krum_wilson_grow_hsc.R index b18d506..c17dd93 100644 --- a/krum_wilson_grow_hsc.R +++ b/krum_wilson_grow_hsc.R @@ -38,7 +38,7 @@ tmp_istate = matrix(round(tmp_istate), nrow=1, dimnames=list(1, names(tmp_istate grown_istate = cbind(istate, tmp_istate) grown_istate = initialise_data(grown_istate) -result = model_train(cdata=fcdata, ddata=fddata, bmodel=grown_bmodel, istate=grown_istate, preprocess=F, verbose=T) +result = model_train(cdata=fcdata, ddata=fddata, bmodel=grown_bmodel, istate=grown_istate, verbose=T) filename = 'krum_wilson_myeloid_grow_trained_bmodel.rda' save(result, file=filename)