Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
GNet
APPINetwork
Commits
945ffd61
Commit
945ffd61
authored
Mar 14, 2022
by
Gosset Simon
Browse files
Update R/clustering_tfit_window.R
parent
b0cbe44d
Changes
1
Hide whitespace changes
Inline
Side-by-side
R/clustering_tfit_window.R
View file @
945ffd61
...
...
@@ -53,14 +53,10 @@ clustering_tfit <- function(organism, network) {
clust
=
unlist
(
result_tfit
[[
2
]][
clust
])
print
(
"######### 1"
)
print
(
clust
)
if
(
length
(
clust
)
>
0
)
{
row
=
cbind
(
i
,
paste
(
clust
,
collapse
=
";"
))
print
(
"######### 2"
)
print
(
paste
(
clust
,
collapse
=
";"
))
clust_tab
=
rbind
(
clust_tab
,
row
)
...
...
@@ -71,7 +67,7 @@ clustering_tfit <- function(organism, network) {
colnames
(
clust_tab
)
=
c
(
"cluster"
,
"proteins"
)
write.table
(
x
=
clust_tab
,
file
=
File.clas
)
write.table
(
x
=
clust_tab
,
file
=
File.clas
,
row.names
=
F
,
col.names
=
T
,
quote
=
F
,
sep
=
"\t"
)
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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