LB_Bitcoin Blockchain Statistics by Beller

SCRIPT PUBLISH - See you related Idea.
Remove from Favorite Scripts Add to Favorite Scripts
study("Blockchain Bitcoin Statistics", shorttitle="Blockchain Statistics", precision=0)

nd = input(true, title="Show Network Deficit")
hr = input(true, title="Show Hash Rate")
mr = input(true, title="Show Miners Revenue")
ct = input(true, title="Show Cost Per Transaction")

//Data showing difference between transaction fees and cost of bitcoin mining.
networkdeficit = security("QUANDL:BCHAIN/NETDF", "D", close) 

//The estimated number of giga hashes per second (billions of hashes per second) the bitcoin network is performing.
hashrate = security("QUANDL:BCHAIN/HRATE", "D", close) 

//Historical data showing (number of bitcoins mined per day + transaction fees) * market price.
minersrevenue = security("QUANDL:BCHAIN/MIREV", "D", close)

//Data showing miners revenue divided by the number of transactions.
cptra = security("QUANDL:BCHAIN/CPTRA", "D", close) 

plot(nd ?networkdeficit:na, color = red, title="Network Deficit",style=area)
plot(hr?hashrate/100:na, color = blue, title="Hash Rate")
plot(mr?minersrevenue:na, color = orange, title="Miners Revenue")
plot(ct?cptra*100000:na, color = purple, title="Cost Per Transaction",style=columns,linewidth=2,transp=70)
hline(0, color=yellow, linestyle=dashed)
Ideas Scripts Chart
United States
United Kingdom
Home Stock Screener Economic Calendar How It Works Chart Features House Rules Moderators For the WEB Widgets Stock Charting Library Priority Support Feature Request Blog & News FAQ Help & Wiki Twitter
Private Messages Chat Ideas Published Followers Following Priority Support Public Profile Profile Settings Account and Billing Sign Out