git://git.onelab.eu
/
monitor.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' of ssh://soltesz@git.planet-lab.org/git/monitor
[monitor.git]
/
statistics
/
functions.r
diff --git
a/statistics/functions.r
b/statistics/functions.r
index
d9e4023
..
e02ee67
100644
(file)
--- a/
statistics/functions.r
+++ b/
statistics/functions.r
@@
-414,3
+414,9
@@
tstamp <- function (date, format="%Y-%m-%d")
ts <- unclass(as.POSIXct(date, format=format, origin="1970-01-01"))[1]
return (ts)
}
ts <- unclass(as.POSIXct(date, format=format, origin="1970-01-01"))[1]
return (ts)
}
+
+lowess_smooth <- function (x, y, delta=(60*60*24), f=0.02)
+{
+ a<-lowess(x, y, delta=delta, f=f)
+ return (a);
+}