Underscore example:
_.each([1, 2, 3], function(num) { alert(num); });| #!/bin/bash | |
| NAME="hello_app" # Name of the application | |
| DJANGODIR=/webapps/hello_django/hello # Django project directory | |
| SOCKFILE=/webapps/hello_django/run/gunicorn.sock # we will communicte using this unix socket | |
| USER=hello # the user to run as | |
| GROUP=webapps # the group to run as | |
| NUM_WORKERS=3 # how many worker processes should Gunicorn spawn | |
| DJANGO_SETTINGS_MODULE=hello.settings # which settings file should Django use | |
| DJANGO_WSGI_MODULE=hello.wsgi # WSGI module name |
| # Truly the most ridiculous thing I could think of. | |
| doInstall <- TRUE # Change to FALSE if you don't want packages installed. | |
| toInstall <- c("XML", "png", "devtools", "RCurl") | |
| if(doInstall){install.packages(toInstall, repos = "http://cran.r-project.org")} | |
| lapply(toInstall, library, character.only = TRUE) | |
| # Some helper functions, lineFinder and makeTable | |
| source_gist("818983") | |
| source_gist("818986") |
| # .png with Windows GDI versus .png with cairographics | |
| doInstall <- TRUE # Change to FALSE if you don't want packages installed. | |
| toInstall <- c("ggplot2", "RColorBrewer", "Cairo") | |
| if(doInstall){install.packages(toInstall, repos = "http://cran.us.r-project.org")} | |
| lapply(toInstall, library, character.only = TRUE) | |
| # Generate some data | |
| nn <- 100 | |
| myData <- data.frame(X = rnorm(nn), |
| plotOptions: { | |
| line : { | |
| dataLabels : { | |
| enabled : true, | |
| formatter: function() { | |
| var first = this.series.data[0], | |
| last = this.series.data[this.series.data.length - 1]; | |
| if ((this.point.category === first.category && this.point.y === first.y) || | |
| (this.point.category === last.category && this.point.y === last.y)) { | |
| return this.point.y; |