Commit 0a6a31de authored by Philippe Veber's avatar Philippe Veber
Browse files

ocamlinit: updated

parent c5c62614
......@@ -2,12 +2,12 @@ module Top = Bistro_utils.Toplevel_eval.Make(struct let np = 8 let mem = 10 end)
open Top
open Codepi
let njplot (t : Biotope.Formats.newick Bistro.file) = Sys.command (Printf.sprintf "njplot %s" (path t))
module P = Simulation_pipeline.Bppseqgen
(* let njplot (t : Biotope.Formats.newick Bistro.file) = Sys.command (Printf.sprintf "njplot %s" (path t)) *)
let n_h0 = 300
let n_ha = 100
let npairs = 10
let tree = Simulation_dataset.Pair_tree { branch_length1 = 3. ; branch_length2 = 3. ; npairs };;
let tree = Simulation_dataset.NHX (Bistro.Workflow.input "data/besnard2009/besnard2009.nhx")
let sim = Simulation_dataset.convdet_simulation ~tree ~profiles:"example/aa_fitness/263SelectedProfiles.tsv" ~n_h0 ~n_ha ();;
let convergent_species = List.init npairs (Printf.sprintf "C%d");;
let tree = Simulation_pipeline.NHX (Bistro.Workflow.input "data/besnard2009/besnard2009.nhx")
let sim = P.bppseqgen_mixed ~tree ~profiles:"example/aa_fitness/263SelectedProfiles.tsv" ~n_h0 ~n_ha ();;
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment