search for: rectype

I would like to read the following hierarchical data set. There is a family record followed by one or more personal records. If col. 7 is "1" it is a family record. If it is "2" it is a personal record. The family record is formatted as follows: col. 1-5 family id col. 7 "1" col. 9 dwelling type code The personal record is formatted as follows: col.

...cted such that the first two letters determine how many variables are in the row (different letters mean different numbers of columns and different column names/types). I can do this in SAS, but I'd prefer to use R. The approximate SAS code is below with the key piece of code being "if rectype='RD'" then do. Thoughts? Zev RD|I|01|073|0023|68103|5|7|017|810|20070103|00:00|0.6||3||||||||||||| RD|I|01|073|0023|68103|5|7|017|810|20070106|00:00|9.5||3||||||||||||| RD|I|01|073|0023|68103|5|7|017|810|20070109|00:00|2.5||3||||||||||||| RD|I|01|073|0023|68103|5|7|017|810|20070112...

...;. My horribly inefficient solution was to search the matrix row by row, test the REC.TYPE column and essentially delete the row if it did not match my criteria. Essentially... > j <- 1 > for (i in 1:nrow(dataset)) { > if(dataset$REC.TYPE[j] != "SAO " && dataset$RECTYPE[j] != "FL-15") { > dataset <- dataset[-j,] } > else { > j <- j+1 } > } After watching my code get through only about 10% of the matrix in an hour and slowing with every row...I figure there must be a more efficient way of pulling out only the records I ne...

...odeReference searchNodeRef = NULL; - tDataListPtr searchNodeName = NULL; - tDirNodeReference userNodeRef = NULL; - tDataListPtr userNodePath = NULL; - char userNodePathStr[256] = {0}; - char recUserName[128] = {0}; - - tDataListPtr recName = NULL; - tDataListPtr recType = NULL; - tDataListPtr attrType = NULL; - - tAttributeListRef attributeListRef = 0; - tRecordEntryPtr outRecordEntryPtr = NULL; - tAttributeEntryPtr attributeInfo = NULL; - tAttributeValueListRef attributeValueListRef = 0; - tAttributeValueEntryPtr attrValue = NULL; -...

...[| + | | Batteries Included - | > |_______|_|_______________________| > _________________________________ > | | | | > | - Type '#help;;' | | + |] > |_______________________|_|_______| > > > # #rectypes;; > # #require "R";; > # module X = R;; > module X : > sig > external init_r : string array -> int = "init_r" > val init : ?argv:string array -> unit -> int > external terminate : unit -> unit = "end_r" > type sexp...

...[| + | | Batteries Included - | > |_______|_|_______________________| > _________________________________ > | | | | > | - Type '#help;;' | | + |] > |_______________________|_|_______| > > > # #rectypes;; > # #require "R";; > # module X = R;; > module X : > sig > external init_r : string array -> int = "init_r" > val init : ?argv:string array -> unit -> int > external terminate : unit -> unit = "end_r" > type sexp...