#!/usr/bin/env r
#
# A simple example to do statistics on files
#
# Copyright (C) 2006 - 2014 Dirk Eddelbuettel
#
# Released under GPL (>= 2)
fsizes <- as.integer(readLines(file("stdin")))
print(summary(fsizes))
stem(fsizes)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.