projects
/
talweg.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
improvements, updated report
[talweg.git]
/
R
/
plot.R
diff --git
a/R/plot.R
b/R/plot.R
index
9a0dbcd
..
b720e9a
100644
(file)
--- a/
R/plot.R
+++ b/
R/plot.R
@@
-71,7
+71,7
@@
plotFilaments <- function(data, index, limit=60)
index = i - first_day + 1
serie = c(data$getCenteredSerie(index), data$getCenteredSerie(index+1))
if (!all(is.na(serie)))
index = i - first_day + 1
serie = c(data$getCenteredSerie(index), data$getCenteredSerie(index+1))
if (!all(is.na(serie)))
- r
ange(serie, na.rm=TRUE
)
+ r
eturn (range(serie, na.rm=TRUE)
)
c()
}) )
grays = gray.colors(20, 0.1, 0.9) #TODO: 20 == magic number
c()
}) )
grays = gray.colors(20, 0.1, 0.9) #TODO: 20 == magic number