This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| [02/20 20:22:17 EST] info: transport end (undefined) | |
| [02/20 20:22:17 EST] debug: set close timeout for client AyFDdcWmLPRwzozSUGEv | |
| [02/20 20:22:17 EST] debug: cleared close timeout for client AyFDdcWmLPRwzozSUGEv | |
| [02/20 20:22:17 EST] debug: cleared heartbeat interval for client AyFDdcWmLPRwzozSUGEv | |
| [02/20 20:22:17 EST] debug: discarding transport | |
| [02/20 20:23:35 EST] debug: client authorized | |
| [02/20 20:23:35 EST] info: handshake authorized pWWBZoxsA4GjSzYkUGEw | |
| [02/20 20:23:35 EST] debug: setting request GET /socket.io/1/websocket/pWWBZoxsA4GjSzYkUGEw | |
| [02/20 20:23:35 EST] debug: set heartbeat interval for client pWWBZoxsA4GjSzYkUGEw | |
| [02/20 20:23:35 EST] debug: websocket writing 7:::1+0 |
whatever
/ divide-Zelig-example.R
Created
January 11, 2013 16:29
Example of using divide.R with Zelig
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(Zelig) | |
| # Divide a Data Frame or Matrix Into Subsets | |
| # @param obj a data.frame or matrix to be split into subsets, divided by the | |
| # categorical variable | |
| # @param by a character-string, specifying the column to subset | |
| # @return a list, containing the subsetted data sets. The names of the list | |
| # correspond to the value of the subsetted list | |
| divide <- function (obj, by) { | |
| # Get the set of possible values |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # Divide a Data Frame or Matrix Into Subsets | |
| # @param obj a data.frame or matrix to be split into subsets, divided by the | |
| # categorical variable | |
| # @param by a character-string, specifying the column to subset | |
| # @return a list, containing the subsetted data sets. The names of the list | |
| # correspond to the value of the subsetted list | |
| divide <- function (obj, by) { | |
| # Get the set of possible values | |
| column.levels <-if (is.factor(obj[, by])) { | |
| levels(obj[, by]) |
whatever
/ gist:4511920
Created
January 11, 2013 16:19
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # Divide a Data Frame or Matrix Into Subsets | |
| # @param obj a data.frame or matrix to be split into subsets, divided by the | |
| # categorical variable | |
| # @param by a character-string, specifying the column to subset | |
| # @return a list, containing the subsetted data sets. The names of the list | |
| # correspond to the value of the subsetted list | |
| divide <- function (obj, by) { | |
| # Get the set of possible values | |
| column.levels <-if (is.factor(obj[, by])) | |
| levels(obj[, by]) |
NewerOlder