"puerto" <-
c(150, 280, 175, 190, 305, 380, 290, 300, 170, 315, 280, 255,
335, 180, 200, 210, 350, 360, 550, 225, 245, 175, 180, 260, 320,
345, 180, 225, 275, 280, 325, 350, 190, 220, 265, 270, 335, 310,
270, 240, 235, 355, 370, 260, 280, 350, 390, 250, 375, 250)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.