torproject/collector
1
0
Fork 0
mirror of https://github.com/torproject/collector.git synced 2024-11-27 11:20:25 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Write Last updated times in UTC.

Browse Source
This commit is contained in:
Karsten Loesing 2010-01-20 16:11:01 +01:00
parent f448abb563
commit c89650ee88
4 changed files with 11 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
R/bridge-stats.R
View File

@ -29,7 +29,10 @@ plot_bridges <- function(country, people, filename, color) {
monthat <- c(monthat, (monthticks[i] + monthticks[i + 1]) / 2)
png(filename, width=600, height=400)
par(mar = c(4.1, 3.9, 2.1, 0))
plot(data, ylim=c(0, max(na.omit(data))), type="l", col=color, lwd=2, axes=FALSE, frame=FALSE, main=paste(people, "Tor users via bridges"), xlab=paste("Last updated:", date()), ylab="")
plot(data, ylim=c(0, max(na.omit(data))), type="l", col=color, lwd=2,
axes=FALSE, frame=FALSE,
main=paste(people, "Tor users via bridges"),
xlab=paste("Last updated:", as.POSIXlt(Sys.time(), "UTC")), ylab="")
axis(1, at=monthticks - 0.5, labels=FALSE, lwd=0, lwd.ticks=1)
axis(1, at=c(1, length(data)), labels=FALSE, lwd=1, lwd.ticks=0)
axis(1, at=monthat, lwd=0, labels=monthlabels)

4
R/consensus-stats.R
View File

@ -38,7 +38,7 @@ exitCol <- "darkgreen"
plot(runningNum, ylim=c(0, max(na.omit(runningNum))), type="l",
col=runningCol, lwd=2, axes=FALSE, frame=FALSE,
main=paste("Number of exit relays"),
xlab=paste("Last updated:", date()), ylab="")
xlab=paste("Last updated:", as.POSIXlt(Sys.time(), "UTC")), ylab="")
lines(exitNum, col=exitCol, lwd=2)
mtext("All relays", side=4, line=0, las=1,
at=tail(na.omit(runningNum), n=1), col=runningCol)
@ -59,7 +59,7 @@ brunningCol <- "blue"
plot(runningNum, ylim=c(0, max(na.omit(runningNum))), type="l",
col=runningCol, lwd=2, axes=FALSE, frame=FALSE,
main=paste("Number of relays and bridges"),
xlab=paste("Last updated:", date()), ylab="")
xlab=paste("Last updated:", as.POSIXlt(Sys.time(), "UTC")), ylab="")
lines(brunningNum, col=brunningCol, lwd=2)
mtext("Relays", side=4, line=0, las=1,
at=tail(na.omit(runningNum), n=1), col=runningCol)

6
R/dirreq-stats.R
View File

@ -29,7 +29,8 @@ plot_moria1 <- function(country, people, filename, color) {
png(filename, width=600, height=400)
par(mar = c(4.1, 3.9, 2.1, 0))
plot(data, ylim=c(0, max(0, na.omit(data))), type="l", col=color, lwd=2,
axes=FALSE, frame=FALSE, xlab=paste("Last updated:", date()),
axes=FALSE, frame=FALSE, xlab=paste("Last updated:",
as.POSIXlt(Sys.time(), "UTC")),
ylab="", main=paste("New or returning, directly connecting", people,
"Tor users"))
axis(1, at=monthticks - 0.5, labels=FALSE, lwd=0, lwd.ticks=1)
@ -82,7 +83,8 @@ plot_trusted <- function(country, people, filename, color) {
png(filename, width=600, height=400)
par(mar = c(4.1, 3.9, 2.1, 0))
plot(data, ylim=c(0, max(0, na.omit(data))), type="l", col=color, lwd=2,
axes=FALSE, frame=FALSE, xlab=paste("Last updated:", date()),
axes=FALSE, frame=FALSE, xlab=paste("Last updated:",
as.POSIXlt(Sys.time(), "UTC")),
ylab="", main=paste("Recurring, directly connecting", people,
"Tor users"))
axis(1, at=monthticks - 0.5, labels=FALSE, lwd=0, lwd.ticks=1)

2
R/torperf.R
View File

@ -65,7 +65,7 @@ for (intervalInd in 1:length(intervals)) {
title <- paste("Time in seconds to complete", sizePr, "request")
xlab <- ""
if (sourceInd == length(sources))
xlab <- paste("Last updated:", date())
xlab <- paste("Last updated:", as.POSIXlt(Sys.time(), "UTC"))
data <- subset(t, source %in% sourceStr)