w_scale <-
structure(c(1, 5, 10, 20, 40, 75, 130, 200, 2.45875343764763,
12.2653535589138, 24.5061736824317, 49.1048654900874, 98.1201858591107,
184.498151135529, 317.985882396659, 491.541152943176), .Dim = c(8L,
2L), .Dimnames = list(NULL, c("w", "scale")))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.