Set size property, if implemented
assignment method for size
| 1 2 3 4 |   size(obj) <- value
  ## Default S3 replacement method:
size(obj) <- value
 | 
| x | widget | 
| ... | passed on | 
| value | size specification, for most widgets a pair c(width, height), but can have exceptions | 
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.