# Compute pi using a series: http://functions.wolfram.com/Constants/Pi/06/01/01/
Reduce(`+`, 4 * vapply(seq_len(1000) - 1, function(k) { (-1)^k / (2 * k + 1) }, double(1)))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.