Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
VEBER Philippe
codepi
Commits
63ab4af5
Commit
63ab4af5
authored
Nov 03, 2020
by
Philippe Veber
Browse files
tk/Inhouse_lmm: correlation matrix is symetric
parent
75d45de4
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
4 additions
and
1 deletion
+4
-1
lib/toolbox/inhouse_lmm.ml
lib/toolbox/inhouse_lmm.ml
+4
-1
No files found.
lib/toolbox/inhouse_lmm.ml
View file @
63ab4af5
...
...
@@ -43,7 +43,10 @@ let index_correlations (t : Convergence_tree.u) cors =
let
matrix_of_correlations
n
cor_assoc
=
let
mat
=
L
.
Mat
.
create
n
n
in
List
.
iter
cor_assoc
~
f
:
(
fun
(
i
,
j
,
c
)
->
mat
.
{
i
+
1
,
j
+
1
}
<-
c
)
;
List
.
iter
cor_assoc
~
f
:
(
fun
(
i
,
j
,
c
)
->
mat
.
{
i
+
1
,
j
+
1
}
<-
c
;
mat
.
{
j
+
1
,
i
+
1
}
<-
c
;
)
;
mat
let
design_matrix
~
m
~
n
~
aa_at_site
(
al
:
Alignment
.
t
)
=
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment