How to split a string conditionally in R? -

-

i split string multiple columns based on number of conditions.

an example of data:

col1<- c("01/05/2004 02:59", "01/05/2004 05:04", "01/06/2004 07:19", "01/07/2004 02:55", "01/07/2004 04:32", "01/07/2004 04:38", "01/07/2004 17:13", "01/07/2004 18:40", "01/07/2004 20:58", "01/07/2004 23:39", "01/09/2004 13:28")  col2<- c("wabamun #4 off line.", "keephills #2 on line.", "wabamun #1 on line.", "north red deer t217s bus lock out.  under investigation.",  "t217s has blown cts on 778l", "t217s north red deer bus in service (778l out of service)", "keephills #2 off line.", "wabamun #4 on line.", "sundance #1 off line.", "keephills #2 on line", "homeland security event lowered yellow ( elevated)")  df<- data.frame(col1,col2)

i able split column w conditionally.

to this:

col3<- c("wabamun #4", "keephills #2", "wabamun #1", "general asset", "general asset", "general asset", "keephills #2", "wabamun #4", "sundance #1", "keephills #2", "general asset")   col4<- c("off line.", "on line.", "on line.", "north red deer t217s bus lock out.  under investigation.",  "t217s has blown cts on 778l", "t217s north red deer bus in service (778l out of service)", "off line.", "on line.", "off line.", "on line", "homeland security event lowered yellow ( elevated)")

after i'm planning find times between when asset goes down , comes online. these generator plants looking capacity of plant. example keephills #2 has capacity of 300mw.

thankfully, regular expressions here save day.

# line prevents character strings turning factors df<- data.frame(col1,col2, stringsasfactors=false)  # match works powerplant names  # they're 1 or more characters followed space, hash , single digit. pwrmatch <- regexpr("^[[:alpha:]]+ #[[:digit:]]", df$col2) df$col3 <- "general asset" df$col3[grepl("^[[:alpha:]]+ #[[:digit:]]", df$col2)] <- regmatches(df$col2, pwrmatch)

col3 looks like: c("wabamun #4", "keephills #2", "wabamun #1", "general asset", "general asset", "general asset", "keephills #2", "wabamun #4", "sundance #1", "keephills #2", "general asset")

the other line similar matter, matching cases of on/off line.

linematch <- regexpr("(on|off) line", df$col2) df$col4 <- df$col2 df$col4[grepl("(on|off) line", df$col2)] <- regmatches(df$col2, linematch)

col4 looks like: c("off line", "on line", "on line", "north red deer t217s bus lock out. under investigation.", "t217s has blown cts on 778l", "t217s north red deer bus in service (778l out of service)", "off line", "on line", "off line", "on line", "homeland security event lowered yellow ( elevated)" )


Comments

Post a Comment

Popular posts from this blog

java - WrongTypeOfReturnValue exception thrown when unit testing using mockito -

-
my test list<person> mylist; @test public void testisvalidperson() { mylist = new arraylist<person>(); mylist.add(new person("tom")); when(persondao.get(person)).thenreturn(mylist); when((persondao.get(person)).isempty()).thenreturn(false);//------exception thrown boolean result = service.isvalid("tom"); assertfalse(result); } method tested: public boolean isvalid(string person){ persondao = new persondao(); person personobj = new person(person); return (persondao.get(person).isempty())?false : true; } exception thrown: org.mockito.exceptions.misusing.wrongtypeofreturnvalue: boolean cannot returned get() get() should return list *** if you're unsure why you're getting above error read on. due nature of syntax above problem might occur because: 1. exception *might* occur in wrongly written multi-threaded tests. please refer mockito faq on limitations of concurrency testing. 2. sp
Read more

php - Magento - Deleted Base url key -

-
i working on cleaning url: http://mydomain.com/shop/shop/deals i going through settings in configuration tab in admin panel on magento , change secure , unsecure base urls remove first base url "shop" web page read: http://mydomain.com/shop/deals so changed unsecure base urls mydomain.com/shop mydomain.com , secure 12.345.67.89/shop 12.345.67.89. wrong thing do. i cannot reload page or admin console. how access these files through ftp , change correctly there?? when make changes in admin panel changes made in database not in file. have make changes in database. 1.go database , select core_config_data table under table find web/unsecure/base_url , web/secure/base_url . make changes here. don't forget clear cache in var/cache folder
Read more

android - How to disable Button if EditText is empty ? -

-
i have edittext , button in application. when button clicked,the text entered in edittext added listview. i want disable button if edittext empty.how ? this code button click imagebutton imb=(imagebutton)findviewbyid(r.id.btn_send); imb.setonclicklistener(new onclicklistener() { @override public void onclick(view arg0) { edittext et = (edittext)findviewbyid(r.id.edittext1); string str = et.gettext().tostring(); web1.add(str); toast.maketext(shoutsingleprogram.this, "you entered...."+str, toast.length_short).show(); adapter1.notifydatasetchanged(); et.settext(""); } }); } how can ? edittext1.addtextchangedlistener(new textwatcher() { @override public void ontextchanged(charsequence s, int start, int before, in
Read more