r - data.table: calculate percentile for all numeric variables -


i have data 

set.seed(1) dt <- data.table(id = c("a", "a", "b", "b","c", "c"),               var1 = c(1:6),              var2 = rnorm(6))  > dt    id var1       var2 1:     1 -0.6264538 2:     2  0.1836433 3:  b    3 -0.8356286 4:  b    4  1.5952808 5:  c    5  0.3295078 6:  c    6 -0.8204684

but with dozens of numeric variables. i'd calculate percentile each observation , every numeric variable using data.table, while keeping key identifier (id) intact. in dplyr this:

mutate_if(dt, is.numeric, function(x) { ecdf(x)(x) })    id      var1      var2 1  0.1666667 0.5000000 2  0.3333333 0.6666667 3  b 0.5000000 0.1666667 4  b 0.6666667 1.0000000 5  c 0.8333333 0.8333333 6  c 1.0000000 0.3333333

i happy result including original var1 , var2.

what best way approach this?

thanks help!

you calculate ecdf numeric columns in separate data table this:

dt2 = as.data.table(lapply(dt,function(x){if(is.numeric(x)){ecdf(x)(x)}}))

result:

> dt2         var1      var2 1: 0.1666667 0.8333333 2: 0.3333333 0.3333333 3: 0.5000000 0.6666667 4: 0.6666667 1.0000000 5: 0.8333333 0.1666667 6: 1.0000000 0.5000000

if want cbind result original dt, change column names using paste0:

colnames(dt2) = paste0("centile_",colnames(dt2))

result:

> dt2    centile_var1 centile_var2 1:    0.1666667    0.8333333 2:    0.3333333    0.3333333 3:    0.5000000    0.6666667 4:    0.6666667    1.0000000 5:    0.8333333    0.1666667 6:    1.0000000    0.5000000

Comments

Post a Comment

Popular posts from this blog

PHP and MySQL WP -

i trying accomplish 2 things here code. writing php directly wp page using insert php plugin. 1) query mysql database , return results 1 column 4 columns. 2) make each result own hyperlink directs user new wp page runs new query on page. i able query show results , turn results dynamic hyperlink, cannot formatting down. right returns result 1 column. here have: [insert_php] $servername = "localhost"; $username = "login"; //edited privacy $password = "password"; //edited privacy $database = "database"; //edited privacy // create connection $conn = new mysqli($servername, $username, $password, $database); // check connection if ($conn->connect_error) { die("connection failed: " . $conn->connect_error); } echo "connected successfully"; //get results database $result = mysqli_query($conn,"select mine mines order mine"); $all_property = array(); //declare array saving property //showing proper...
Read more

android - InAppBilling registering BroadcastReceiver in AndroidManifest -

i'm implementing inapp billing in android app. works well, however, i'm trying decouple broadcast receiver activity manifest. suggestion in android's trivialdrive sample: // important: dynamically register broadcast messages updated purchases. // register receiver here instead of <receiver> in manifest // because call getpurchases() @ startup, therefore can ignore // broadcasts sent while app isn't running. // note: registering listener in activity bad idea, done here // because sample. regardless, receiver must registered after // iabhelper setup, before first call getpurchases(). currently there's class extends broadcastreceiver : public class iabbroadcastreceiver extends broadcastreceiver { /** * intent action receiver should filter for. */ public static final string action = "com.android.vending.billing.purchases_updated"; private final iabbroadcastlistener mlistener; public iabbroadcastreceiver(iabbroadcastlistener listener) { m...
Read more

go - golang pprof for c library code -

i have been trying profile golang application pprof, seems details of c code(linked static library) missed in output result. flame graph from frame graph can see c code time consuming reported within "runtime._externalcode", no details @ all. , sure static library compiled debug enable. so there way make pprof details(like stack trace) of 3rd party c code? or there other golang profiling tool this?
Read more