theymos (OP)
Administrator
Legendary
Offline
Activity: 5362
Merit: 13337
|
|
January 24, 2013, 09:12:11 PM |
|
Someone requested that I post the /r/Bitcoin stats. Here they are in Reddit's JSON format so that you can create your own graphs: http://pastebin.com/6kbMAAR3The numbers in each array are, in order: -Unix timestamp representing a day/hour/month -Uniques -Pageviews -Subscriptions (omitted on time periods other than "day")
|
1NXYoJ5xU91Jp83XfVMHwwTUyZFK64BoAD
|
|
|
Herodes
|
|
January 26, 2013, 04:27:24 AM |
|
Now if only some stat geek gave us a fine graph over daily visitors.
|
|
|
|
|
organofcorti
Donator
Legendary
Offline
Activity: 2058
Merit: 1007
Poor impulse control.
|
|
January 27, 2013, 12:33:29 PM |
|
Here is not only the requested elderberry chart, but also the R script that generated it. If theymos updates the data you'll be able to generate the same charts yourself (after changing the pastebin url in the script). ### reddit/r/Bitcoin stats require(RJSONIO) require(reshape) require(ggplot2)
### change "pasteBinUrl" if theymos updates data ### pasteBinUrl <- "http://pastebin.com/6kbMAAR3" ###
### functions date.func <- function(x) ISOdate(1970,1,1)+ x$Unixtime
### download data uniqueID <- gregexpr("[1-9]", pasteBinUrl)[[1]] reddit <- fromJSON(paste("http://pastebin.com/download.php?i=", substr(pasteBinUrl, uniqueID[1], uniqueID[2]), sep=''))
### format data sets for plotting
r.month <- data.frame(do.call(rbind, reddit$month)) r.day <- data.frame(do.call(rbind, reddit$day)) r.hour <- data.frame(do.call(rbind, reddit$hour))
colnames(r.month) <- c("Unixtime", paste(c("Uniques per", "Pageviews per"),"month")) colnames(r.day) <- c("Unixtime", paste(c("Uniques per", "Pageviews per", "Subscriptions per"),"day")) colnames(r.hour) <- c("Unixtime", paste(c("Uniques per", "Pageviews per"), "hour"))
#r.day$"Cumulative subscriptions" <- rev(c(cumsum(r.day$Subscriptions))) r.day$Date <- date.func(r.day); r.month$Date <- date.func(r.month); r.hour$Date <- date.func(r.hour)
plot.df <- rbind( melt(r.month[, 2:4], id="Date"), melt(r.day[, 2:5], id="Date"), melt(r.hour[, 2:4], id="Date") )
#### the chart reddit.plot <- ggplot(plot.df, aes(Date, value)) + geom_line() + facet_wrap(~variable, scales="free", ncol=1) + ggtitle("r/Bitcoin statistics from theymos' data") + xlab("") + ylab("") png(paste('reddit', Sys.Date(), '.png',sep=''),height=960*4,width=960*16/9*4/5,res=220) reddit.plot dev.off()
#### the end
|
|
|
|
Herodes
|
|
January 27, 2013, 12:45:39 PM |
|
Great work man! Thanks
|
|
|
|
organofcorti
Donator
Legendary
Offline
Activity: 2058
Merit: 1007
Poor impulse control.
|
|
January 28, 2013, 04:49:18 AM |
|
But wait, there's more:
|
|
|
|
Mr. Coinman
|
|
January 28, 2013, 09:34:43 AM Last edit: April 04, 2013, 05:44:12 PM by Mr. Coinman |
|
There definitely seems to be some steady growth! .
|
|
|
|
theymos (OP)
Administrator
Legendary
Offline
Activity: 5362
Merit: 13337
|
|
April 03, 2013, 01:01:44 AM |
|
|
1NXYoJ5xU91Jp83XfVMHwwTUyZFK64BoAD
|
|
|
organofcorti
Donator
Legendary
Offline
Activity: 2058
Merit: 1007
Poor impulse control.
|
|
April 03, 2013, 09:35:58 AM |
|
|
|
|
|
phelix
Legendary
Offline
Activity: 1708
Merit: 1020
|
|
April 03, 2013, 10:22:27 PM |
|
Any chance of getting this data / these diagrams regularly?
|
|
|
|
organofcorti
Donator
Legendary
Offline
Activity: 2058
Merit: 1007
Poor impulse control.
|
|
April 03, 2013, 10:28:18 PM |
|
Any chance of getting this data / these diagrams regularly?
So far Theymos has provided updates every sixty eight days, like clockwork. You want the updates more often? If Theymos is able to provide updates more often and I don't have time to provide chart updates more often, I'll post an updated script to generate the charts and you'll be able to do it yourself.
|
|
|
|
phelix
Legendary
Offline
Activity: 1708
Merit: 1020
|
|
April 03, 2013, 10:32:41 PM |
|
Any chance of getting this data / these diagrams regularly?
So far Theymos has provided updates every sixty eight days, like clockwork. You want the updates more often? If Theymos is able to provide updates more often and I don't have time to provide chart updates more often, I'll post an updated script to generate the charts and you'll be able to do it yourself. yeah, I meant on a daily basis at least. Not sure how often reddit data is updated. I think I would choose the diagram that has the best correlation / the most meaning and would put it up my website.
|
|
|
|
organofcorti
Donator
Legendary
Offline
Activity: 2058
Merit: 1007
Poor impulse control.
|
|
April 03, 2013, 10:36:43 PM |
|
Any chance of getting this data / these diagrams regularly?
So far Theymos has provided updates every sixty eight days, like clockwork. You want the updates more often? If Theymos is able to provide updates more often and I don't have time to provide chart updates more often, I'll post an updated script to generate the charts and you'll be able to do it yourself. yeah, I meant on a daily basis at least. Not sure how often reddit data is updated. I think I would choose the diagram that has the best correlation / the most meaning and would put it up my website. Sounds uncomfortable. Which one has the most meaning for you?
|
|
|
|
phelix
Legendary
Offline
Activity: 1708
Merit: 1020
|
|
April 03, 2013, 11:04:58 PM |
|
Any chance of getting this data / these diagrams regularly?
So far Theymos has provided updates every sixty eight days, like clockwork. You want the updates more often? If Theymos is able to provide updates more often and I don't have time to provide chart updates more often, I'll post an updated script to generate the charts and you'll be able to do it yourself. yeah, I meant on a daily basis at least. Not sure how often reddit data is updated. I think I would choose the diagram that has the best correlation / the most meaning and would put it up my website. Sounds uncomfortable. why? of course this would have to be automatic. Which one has the most meaning for you?
the first one I guess
|
|
|
|
organofcorti
Donator
Legendary
Offline
Activity: 2058
Merit: 1007
Poor impulse control.
|
|
April 03, 2013, 11:19:38 PM |
|
Any chance of getting this data / these diagrams regularly?
So far Theymos has provided updates every sixty eight days, like clockwork. You want the updates more often? If Theymos is able to provide updates more often and I don't have time to provide chart updates more often, I'll post an updated script to generate the charts and you'll be able to do it yourself. yeah, I meant on a daily basis at least. Not sure how often reddit data is updated. I think I would choose the diagram that has the best correlation / the most meaning and would put it up my website. Sounds uncomfortable. why? of course this would have to be automatic. Not sure I'd want to put anything up my um "website" automatically Which one has the most meaning for you?
the first one I guess Looking at your website, I'd reckon you'd be able to create that chart yourself from the raw data without any problems. I'm not sure Theymos would be keen to post an update of the data every day though.
|
|
|
|
theymos (OP)
Administrator
Legendary
Offline
Activity: 5362
Merit: 13337
|
|
April 03, 2013, 11:22:50 PM |
|
I'll do it automatically if someone writes me a PHP/Python/Perl/Bash script which logs a user onto reddit, fetches http://www.reddit.com/r/Bitcoin/about/traffic.json, and then prints it to stdout.
|
1NXYoJ5xU91Jp83XfVMHwwTUyZFK64BoAD
|
|
|
phelix
Legendary
Offline
Activity: 1708
Merit: 1020
|
|
April 03, 2013, 11:25:42 PM |
|
[...] Looking at your website, I'd reckon you'd be able to create that chart yourself from the raw data without any problems. I'm not sure Theymos would be keen to post an update of the data every day though.
yeah I am pretty sure he has better things to do. like sitting on an island. So, Theymos, should there be an easy solution for you to make this data public I would go for displaying it.
|
|
|
|
phelix
Legendary
Offline
Activity: 1708
Merit: 1020
|
|
April 03, 2013, 11:27:34 PM |
|
ok. I will hopefully find the time soon and let you know. Python would be my choice. edit: and I see it should even be possible to do it nicely: http://www.reddit.com/dev/apiAPIs are the web 3.0
|
|
|
|
whiskers75
|
|
April 07, 2013, 05:27:55 AM |
|
Node.js? I'll write one!
|
|
|
|
whiskers75
|
|
April 07, 2013, 05:42:55 AM |
|
On my end, it doesn't resolve properly (getaddrinfo ENOTFOUND) but maybe you'll have some luck: // whiskers75's /r/Bitcoin Script! :) // Coded by whiskers75 for theymos and users of the Bitcoin Forum.
var http = require('http');
var options = { port: 80, hostname: 'http://www.reddit.com', method: 'GET', path: '/r/bitcoin/about/traffic.json' }; console.log('Requesting ' + options.hostname + options.path + ':' + options.port + ' (' + options.method + ')'); var req = http.request(options, function(res) { res.setEncoding('utf8'); res.on('data', function (chunk) { console.log(chunk); }); });
|
|
|
|
|