Commit b808b7d1 authored by Philippe Veber's avatar Philippe Veber
Browse files

Pipeline2: added diffsel

parent f4afdeb5
......@@ -67,6 +67,15 @@ let nucleotide_alignment (Simulation _ as d) =
let phylip_nucleotide_alignment d =
Bppsuite.fna2phy ~fna:(nucleotide_alignment d)
let diffsel d =
Diffsel.diffsel
~phy_n:(phylip_nucleotide_alignment d)
~tree:(tree d)
~w_every:1
~n_cycles:50
()
|> Diffsel.selector
let diffseldsparse d =
Diffseldsparse.diffseldsparse
~alignment:(phylip_nucleotide_alignment d)
......
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