projects
/
morpheus.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Add draft of a function to draw computation times
[morpheus.git]
/
reports
/
printTime.R
diff --git a/reports/printTime.R
b/reports/printTime.R
new file mode 100644
(file)
index 0000000..
3e83a12
--- /dev/null
+++ b/
reports/printTime.R
@@ -0,0
+1,10
@@
+load("timings.RData")
+for (d in c(2,5,10))
+{
+ cat("\n")
+ for (n in 4:6)
+ {
+ cat(mean(sapply(1:100, function(i) tm[[i]]$fm[d,n])))
+ cat(" ")
+ }
+}