thr3ads.net - R help - [R] Using while statements to insert rows in a dataframe [May 2009]

If this information is useful, please help other people find it:
Share via:

Eric McKibben

2009-May-19 15:33 UTC

[R] Using while statements to insert rows in a dataframe

Hi.
I am very new to R and have been diligently working my way through the manual
and various tutorials.  I am now trying to work with some of my own data and
have encountered a problem that I need to fix.  I have a dataframe with 8
columns and approximately 850 rows.  I have provided an excerpt of the dataframe
below.  Within column 6 (Question) the numbers 1:33 repeat down the entire
column.  Occasionally, however, another value (-32767) appears.  I need to
locate this value everytime it appears and in its place insert 33 rows that are
numbered 1:33 in column Question.  Additionally, I need to maintain the
integrity of the other columns so that the values at that location in each
column are also repeated 33 times.  So, in the example below, I currently have
68 rows of data, but I actually need 132 rows (two -32767 values need to be
replaced).  Based on my reading I am guessing that I need to use a while loop,
but I cannot seem to get it right.  Is this the appropriate function or is there
another more efficient method for achieving my goal.  Again, I am quite new to
R.  Thanks for your help!

Year Month Day Time PartID Question Latency Response
2008 2 7 194556 6 1 265 -1
2008 2 7 194556 6 2 466 84
2008 2 7 194556 6 3 199 68
2008 2 7 194556 6 4 152 83
2008 2 7 194556 6 5 177 100
2008 2 7 194556 6 6 177 61
2008 2 7 194556 6 7 400 43
2008 2 7 194556 6 8 225 88
2008 2 7 194556 6 9 249 32
2008 2 7 194556 6 10 172 8
2008 2 7 194556 6 11 163 17
2008 2 7 194556 6 12 326 70
2008 2 7 194556 6 13 232 26
2008 2 7 194556 6 14 157 22
2008 2 7 194556 6 15 135 -1
2008 2 7 194556 6 16 133 2
2008 2 7 194556 6 17 222 2
2008 2 7 194556 6 18 357 4
2008 2 7 194556 6 19 131 -1
2008 2 7 194556 6 20 222 90
2008 2 7 194556 6 21 230 35
2008 2 7 194556 6 22 374 32
2008 2 7 194556 6 23 275 85
2008 2 7 194556 6 24 141 -1
2008 2 7 194556 6 25 264 19
2008 2 7 194556 6 26 380 17
2008 2 7 194556 6 27 240 21
2008 2 7 194556 6 28 127 -1
2008 2 7 194556 6 29 232 92
2008 2 7 194556 6 30 205 95
2008 2 7 194556 6 31 185 96
2008 2 7 194556 6 32 319 61
2008 2 7 194556 6 33 101 -1
2008 2 8 122203 6 -32767 0 NA
2008 2 7 194556 6 1 265 -1
2008 2 7 194556 6 2 466 84
2008 2 7 194556 6 3 199 68
2008 2 7 194556 6 4 152 83
2008 2 7 194556 6 5 177 100
2008 2 7 194556 6 6 177 61
2008 2 7 194556 6 7 400 43
2008 2 7 194556 6 8 225 88
2008 2 7 194556 6 9 249 32
2008 2 7 194556 6 10 172 8
2008 2 7 194556 6 11 163 17
2008 2 7 194556 6 12 326 70
2008 2 7 194556 6 13 232 26
2008 2 7 194556 6 14 157 22
2008 2 7 194556 6 15 135 -1
2008 2 7 194556 6 16 133 2
2008 2 7 194556 6 17 222 2
2008 2 7 194556 6 18 357 4
2008 2 7 194556 6 19 131 -1
2008 2 7 194556 6 20 222 90
2008 2 7 194556 6 21 230 35
2008 2 7 194556 6 22 374 32
2008 2 7 194556 6 23 275 85
2008 2 7 194556 6 24 141 -1
2008 2 7 194556 6 25 264 19
2008 2 7 194556 6 26 380 17
2008 2 7 194556 6 27 240 21
2008 2 7 194556 6 28 127 -1
2008 2 7 194556 6 29 232 92
2008 2 7 194556 6 30 205 95
2008 2 7 194556 6 31 185 96
2008 2 7 194556 6 32 319 61
2008 2 7 194556 6 33 101 -1
2008 2 8 143056 6 -32767 0 NA




Eric S McKibben
Industrial-Organizational Psychology Graduate Student
Clemson University
Clemson, SC
	[[alternative HTML version deleted]]

Dieter Menne

2009-May-19 15:55 UTC

head link

[R] Using while statements to insert rows in a dataframe

Eric McKibben wrote:> 
> Within column 6 (Question) the numbers 1:33 repeat down the entire column. 
> Occasionally, however, another value (-32767) appears.  I need to locate
> this value everytime it appears and in its place insert 33 rows that are
> numbered 1:33 in column Question.  
> Additionally, I need to maintain the integrity of the other columns so
> that the values at that location in each column are also repeated 33
> times.  So, in the example below, I currently have 68 rows of data, but I
> actually need 132 rows (two -32767 values need to be replaced). 
> 
> Year Month Day Time PartID Question Latency Response
> 2008 2 7 194556 6 1 265 -1
> 2008 2 7 194556 6 2 466 84
> 2008 2 7 194556 6 3 199 68
> ..
> 2008 2 8 122203 6 -32767 0 NA
> 
It's always good to boil down you example to the minimal possible, your
example is too big.
To clarify you point: assuming there are only two questions:

You have:

Question Latency Response
1        265 -1
2        466 84
-32767 0   NA

You need? 

Question Latency Response
1        265 -1
2        466 84
1        265 -1
2        466 84






-- 
View this message in context:
http://www.nabble.com/Using-while-statements-to-insert-rows-in-a-dataframe-tp23618849p23619171.html
Sent from the R help mailing list archive at Nabble.com.

Luc Villandre

2009-May-19 16:00 UTC

head link

[R] Using while statements to insert rows in a dataframe

Eric McKibben wrote:> Hi.
> I am very new to R and have been diligently working my way through the
manual and various tutorials.  I am now trying to work with some of my own data
and have encountered a problem that I need to fix.  I have a dataframe with 8
columns and approximately 850 rows.  I have provided an excerpt of the dataframe
below.  Within column 6 (Question) the numbers 1:33 repeat down the entire
column.  Occasionally, however, another value (-32767) appears.  I need to
locate this value everytime it appears and in its place insert 33 rows that are
numbered 1:33 in column Question.  Additionally, I need to maintain the
integrity of the other columns so that the values at that location in each
column are also repeated 33 times.  So, in the example below, I currently have
68 rows of data, but I actually need 132 rows (two -32767 values need to be
replaced).  Based on my reading I am guessing that I need to use a while loop,
but I cannot seem to get it right.  Is this the appropriate function!
>  
>   or is there another more efficient method for achieving my goal.  Again,
I am quite new to R.  Thanks for your help!
>
> Year Month Day Time PartID Question Latency Response
> 2008 2 7 194556 6 1 265 -1
> 2008 2 7 194556 6 2 466 84
> 2008 2 7 194556 6 3 199 68
> 2008 2 7 194556 6 4 152 83
> 2008 2 7 194556 6 5 177 100
> 2008 2 7 194556 6 6 177 61
> 2008 2 7 194556 6 7 400 43
> 2008 2 7 194556 6 8 225 88
> 2008 2 7 194556 6 9 249 32
> 2008 2 7 194556 6 10 172 8
> 2008 2 7 194556 6 11 163 17
> 2008 2 7 194556 6 12 326 70
> 2008 2 7 194556 6 13 232 26
> 2008 2 7 194556 6 14 157 22
> 2008 2 7 194556 6 15 135 -1
> 2008 2 7 194556 6 16 133 2
> 2008 2 7 194556 6 17 222 2
> 2008 2 7 194556 6 18 357 4
> 2008 2 7 194556 6 19 131 -1
> 2008 2 7 194556 6 20 222 90
> 2008 2 7 194556 6 21 230 35
> 2008 2 7 194556 6 22 374 32
> 2008 2 7 194556 6 23 275 85
> 2008 2 7 194556 6 24 141 -1
> 2008 2 7 194556 6 25 264 19
> 2008 2 7 194556 6 26 380 17
> 2008 2 7 194556 6 27 240 21
> 2008 2 7 194556 6 28 127 -1
> 2008 2 7 194556 6 29 232 92
> 2008 2 7 194556 6 30 205 95
> 2008 2 7 194556 6 31 185 96
> 2008 2 7 194556 6 32 319 61
> 2008 2 7 194556 6 33 101 -1
> 2008 2 8 122203 6 -32767 0 NA
> 2008 2 7 194556 6 1 265 -1
> 2008 2 7 194556 6 2 466 84
> 2008 2 7 194556 6 3 199 68
> 2008 2 7 194556 6 4 152 83
> 2008 2 7 194556 6 5 177 100
> 2008 2 7 194556 6 6 177 61
> 2008 2 7 194556 6 7 400 43
> 2008 2 7 194556 6 8 225 88
> 2008 2 7 194556 6 9 249 32
> 2008 2 7 194556 6 10 172 8
> 2008 2 7 194556 6 11 163 17
> 2008 2 7 194556 6 12 326 70
> 2008 2 7 194556 6 13 232 26
> 2008 2 7 194556 6 14 157 22
> 2008 2 7 194556 6 15 135 -1
> 2008 2 7 194556 6 16 133 2
> 2008 2 7 194556 6 17 222 2
> 2008 2 7 194556 6 18 357 4
> 2008 2 7 194556 6 19 131 -1
> 2008 2 7 194556 6 20 222 90
> 2008 2 7 194556 6 21 230 35
> 2008 2 7 194556 6 22 374 32
> 2008 2 7 194556 6 23 275 85
> 2008 2 7 194556 6 24 141 -1
> 2008 2 7 194556 6 25 264 19
> 2008 2 7 194556 6 26 380 17
> 2008 2 7 194556 6 27 240 21
> 2008 2 7 194556 6 28 127 -1
> 2008 2 7 194556 6 29 232 92
> 2008 2 7 194556 6 30 205 95
> 2008 2 7 194556 6 31 185 96
> 2008 2 7 194556 6 32 319 61
> 2008 2 7 194556 6 33 101 -1
> 2008 2 8 143056 6 -32767 0 NA
>
>
>
>
> Eric S McKibben
> Industrial-Organizational Psychology Graduate Student
> Clemson University
> Clemson, SC
> 	[[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>   Hi Eric,

Using a /while/ statement would probably work, but it would imply not 
making use of R's convenient indexing aspect. What I suggest is the 
following (my.data is the data.frame you provided) :
> ## To locate the rows ;
>
> row.pos = which(my.data$Question==-32767) ;
> repeat.index = rep(row.pos, 33) ;
>
> ## To output the result data.frame ;
>
> index.vector = sort(c(seq_along(my.data$Question)[my.data$Question != 
> -32767], repeat.index)) ;
> final.result = my.data[index.vector,] ;This should do the trick.

Cheers,
-- 
*Luc Villandr?*
/Biostatistician
McGill University Health Center -
Montreal Children's Hospital Research Institute/

Apparently Analagous Threads

Search for more possibly parallel threads

R help - May 2009 - Using while statements to insert rows in a dataframe

[R] Using while statements to insert rows in a dataframe

[R] Using while statements to insert rows in a dataframe

[R] Using while statements to insert rows in a dataframe

Apparently Analagous Threads