| # SparkR [1] version of the Spark quickstart SimplApp example [2] | |
| library(SparkR) | |
| sc <- sparkR.init(master="local") | |
| filter <- function(rdd, pred) { flatMap(rdd, function(x) { if (pred(x)) { list(x) } else { list() } })} | |
| logFile <- "spark-0.9.0-incubating-bin-hadoop2/readme.md" | |
| logData <- textFile(sc, logFile) |
Dies ist ein Experiment, das zeigt, wie man ein Modul in einer fremden Sprache in [Node][] laden kann.
Dies ist ein Stück [Forth][]:
: sq ( x -- x² ) dup * ; 3 4 * dup . sq .
Der Programmcode definiert ein neues Wort sq, welches (wie der in runde Klammern eingeschlossene Kommentar erläutert) die oberste auf dem Stack befindliche Zahl quadriert. Danach berechnet es das Produkt von 3 und 4, gibt es aus und quadriert das Ergebnis und gibt auch das aus.
| tcpdump -i eth0 -n port 67 and port 68 |
| 20 chars Constant namestring-len | |
| Create namestring namestring-len allot | |
| : input ( buf-addr buf-len prompt-addr promt-len -- buf-add len ) | |
| \ prompt user for string | |
| cr type over swap accept ; | |
| : get-age ( -- n ) | |
| 0. | |
| BEGIN ( d ) |
| #!/usr/bin/kermit + | |
| # Kermit startup file for connecting to 4e4th (http://www.4e4th.eu/) | |
| kermit -H -l /dev/ttyACM3 | |
| set speed 9600 | |
| set reliable | |
| fast | |
| set carrier-watch off | |
| set key \127 \8 | |
| set key \96 "\92 bye\4" | |
| set flow-control none |
| # Skeleton Makefile to work with SPIN/Promela on the command line | |
| SRC=philo.pml | |
| check: ./pan | |
| @rm -f $(SRC).trail | |
| ./pan -n | |
| log: $(SRC) $(SRC).trail | |
| spin -t -p $(SRC) |