r - select column in data frame based on NAs in rows -


say have data frame of 7 columns, rows having 7 values , others nas past point. want grab last value (going left right) not na , value directly left. hierarchical data, groups go deeper others. want deepest , second deepest groups in 2 columns in new data frame.

this code works maxes out memory data frame of 46k observations. there more efficient way i'm not thinking of?

df <- data.frame(level1 = c('animal', 'vegetable', 'mineral'),                  level2 = c('mammal', 'pepper', 'rock'),                  level3 = c('dog', 'jalepeno', na),                  level4 = c('westie', na, na))  deepest <- apply(df, 1,                    function(x) length(which(!is.na(x)))) one.up <- apply(df, 1,                      function(x) length(which(!is.na(x)))-1) len <- nrow(df) output <- data.frame(one.up = unlist(sapply(1:len,                              function(x) df[x, one.up[x]])),                      deepest= unlist(sapply(1:len,                                              function(x) df[x, deepest[x]])))

first time posting. can cobble need site. in advance.

i think save running loop twice simple apply call, like:

> apply(df, 1, function(x) { +     n <- max(which(!is.na(x))) +     x[(n-1):n] + })      [,1]     [,2]       [,3]      [1,] "dog"    "pepper"   "mineral" [2,] "westie" "jalepeno" "rock"

Comments

Post a Comment

Popular posts from this blog

java - Play! framework 2.0: How to display multiple image? -

i need display gallery of photos. here template: @(photos: list[photo]) @title = { <bold>gallery</bold> } @main(title,"photo"){ <ul class="thumbnails"> @for(photo <- photos) { <li class="span3"> <a href="#" class="thumbnail"> <img src="@photo.path" alt=""> </a> </li> } </ul> } and here controller method: public static result getphotos() { return ok(views.html.photo.gallery.render(photo.get())); } and here photo bean : @entity public class photo extends model { @id public long id; @required public string label; public string path; public photo(string path, string label) { this.path = path; this.label = label; } private static finder<long, photo> find = new finder<long, photo>( long.class, photo.class); public static list<phot...
Read more

gmail - Is there any documentation for read-only access to the Google Contacts API? -

i want read-only access user's google contacts. there stackoverflow member wanted this, , received following answer : yes, there is, use https://www.googleapis.com/auth/contacts.readonly scope , "view contacts". this exchange reference read-only access google contacts can find using google. simply using access token obtained attempt read usual google contacts api (i.e. https://www.google.com/m8/feeds ) fails insufficient permissions. similarly, using google contacts api on new target fails 404 errors (for example https://www.googleapis.com/auth/contacts.readonly/default/full ). is there documentation anywhere on how use api, or permissible way access google contacts api full read-write access?
Read more

php - Controller/JToolBar not working in Joomla 2.5 -

relevant code: jtoolbarhelper::custom('savecategories', 'save', '', 'save', false, false); ... <input type="hidden" name="controller" value="easyblogcontroller"> according can dig docs , own previous questions, should call savecategories() function in easyblogcontroller . i've tried setting value easyblog , easyblog.php (file name) current easyblogcontroller (class name). clicking on save button refreshes page. not redirect, echo or var_dump test code put in savecategories() function. var_dump ing jrequest::getvar('controller') , 'task' return correct values. creating controller object , using $controller->execute('task'); works. the values going depend on location of controller trying call, , have couple options here. typically there controller in base folder of component (likely components/com_easyblog) in file called controller.php , class name inside ...
Read more