dataframe - R: Create 2 columns with difference and percentages values of another column -

-

i have dataframe 

id <- c(101,101,101,102,102,102,103,103,103) pt_a <- c(50,100,150,20,30,40,60,80,90) df <- data.frame(id,pt_a)  +-----+------+ | id  | pt_a | +-----+------+ | 101 |   50 | | 101 |  100 | | 101 |  150 | | 102 |   20 | | 102 |   30 | | 102 |   40 | | 103 |   60 | | 103 |   80 | | 103 |   90 | +-----+------+

i want create 2 new columns values calculated pt_a column. 

df$del_pt_a <- nthrow(pt_a) - 1strow(pt_a) grouped id, n = 1,2,...n df$perc_pt_a <- nthrow(del_pt_a) / 1strow(pt_a) grouped id, n = 1,2,...n

here desired output

+-----+------+---------+-----------+ | id  | pt_a | del_pt_a | perc_pt_a| +-----+------+---------+-----------+ | 101 |   50 | 0       | 0         | | 101 |  100 | 50      | 1.0       | | 101 |  150 | 100     | 2.0       | | 102 |   20 | 0       | 0         | | 102 |   30 | 10      | 0.5       | | 102 |   40 | 20      | 1.0       | | 103 |   60 | 0       | 0         | | 103 |   80 | 20      | 0.3       | | 103 |   90 | 30      | 0.5       | +-----+------+---------+-----------+

i desired result in ms excel want learn in r make work efficient. came across packages dplyr, plyr, data.table etc couldn't solve using those. 1 please me figure out how work around this.

here's data.table way:

library(data.table) setdt(df)[,`:=`(     del       = pt_a - pt_a[1],     perc      = pt_a/pt_a[1]-1 ),by=id]

which gives

    id pt_a del      perc 1: 101   50   0 0.0000000 2: 101  100  50 1.0000000 3: 101  150 100 2.0000000 4: 102   20   0 0.0000000 5: 102   30  10 0.5000000 6: 102   40  20 1.0000000 7: 103   60   0 0.0000000 8: 103   80  20 0.3333333 9: 103   90  30 0.5000000

Comments

Post a Comment

Popular posts from this blog

PHP DOM loadHTML() method unusual warning -

-
i had following code works fine on localhost: $document = new domdocument(); $document->loadhtml($p_result); $form = $document->getelementsbytagname('form')->item(0); // code continues using $form variable after same code updated on outside server, loadhtml() failed , issued warning. warning: domdocument::loadhtml() expects parameter 1 valid path, string given in path/name/to/script.php returned null instead of object code pretty gets fatal error. note contents of $p_result absolutely same on outside server , on localhost. but why displays kind of warning , why not work? doesn't loadhtml() expects argument 1 string in first place? why method expects parameter 1 valid path ? just make clear i'm not calling loadhtmlfile() , i'm calling loadhtml() . thanks. you're affected one of php bugs . issue present in php 5.6.8 , 5.6.9. have affected php version on server, , bug-free version on localhost. the bug forbids null
Read more

python - How to create jsonb index using GIN on SQLAlchemy? -

-
here's current code creating index jsonb. index("mytable_data_idx_id_key", mytable.data['id'].astext, postgresql_using='gin') but got error. sqlalchemy.exc.programmingerror: (psycopg2.programmingerror) data type text has no default operator class access method "gin" hint: must specify operator class index or define default operator class data type. [sql: "create index event_data_idx_id_key on event using gin ((data ->> 'id'))"] is there way create index on sqlalchemy? the postgresql specific sqlalchemy docs @ http://docs.sqlalchemy.org/en/latest/dialects/postgresql.html#operator-classes mention postgresql_ops dictionary provide "operator class" used postgresql, , provide example illustrating use: index('my_index', my_table.c.id, my_table.c.data, postgresql_ops={ 'data': 'text_pattern_ops',
Read more

c# - TransactionScope not rolling back although no complete() is called -

-
i'm using transactionscope rollback transaction fail bool errorreported = false; action<importerrorlog> newerrorcallback = e => { errorreported = true; errorcallback(e); }; using (var transaction = new transactionscope()) { foreach (importtaskdefinition task in taskdefinition) { loader.load(streamfile, newerrorcallback, task.destinationtable, processingtaskid); } if (!errorreported) transaction.complete(); } i'm sure there no transactionscope started ahead or after code. i'm using entity framework insert in db. regardless state of errorreported transaction never rolled in case of error. what missing ? transactionscope sets transaction.current . that's does. wants transacted must @ property. i believe ef each time connection opened reason. probably, connection open when scope installed. open connection inside of scope or enlist manually. ef has nasty "design decision": default opens
Read more