string - Working with the rep() function -


i'm using rep() function repeat each element in string number of times. each character have contains information state, , need first 3 elements of character vector repeated 3 times, , fourth element repeated 5 times.

so lets have following character vectors.

al <- c("alabamacity", "alabamacityst", "alabamacitystate", "alabamazipcode")  ak <- c("alaskacity", "alaskacityst", "alaskacitystate", "alaskazipcode") az <- c("arizonacity", "arizonacityst", "arizonacitystate", "arizonazipcode") ar <- c("arkansascity", "arkansascityst", "arkansascitystate", "arkansaszipcode")

i want end having following output.

alabamacity alabamacity alabamacity alabamacityst alabamacityst alabamacityst alabamacitystate alabamacitystate alabamacitystate alabamazipcode alabamazipcode alabamazipcode alabamazipcode alabamazipcode alabamazipcode ...

i able desired output following command, it's little inconvenient when i'm running through fifty states. plus, might have column 237 cities in alabama, , i'll inevitably run problems matching names in first column values in second column.

   dat = data.frame(name=c(rep(al[1:3],each=3), rep(al[4],each=6),                  rep(ak[1:3],each=3), rep(ak[4],each=6)))    dat      dat2 = data.frame(name=c(rep(al[1:3],each=3), rep(al[4],each=6),                  rep(ak[1:3],each=3), rep(ak[4],each=6)),                 city=c(rep("x",each=15), rep("y",each=15)))    dat2

of course, in real life, 'x' , 'y' won't single values.

so question concerns if there more efficient way of performing task. , closely related question, when become important ditch procedural programming in favor of oop in r. (not programmer, second part may stupid question) more importantly, task should oop related solution.

according ?rep, times= can vector. so, how this:

dat <- data.frame(name=rep(al, times=c(3,3,3,6)))

it more convenient if "state" data in list.

statedata <- list(al,ak,az,ar) data <- lapply(statedata, function(x) data.frame(name=rep(x, times=c(3,3,3,6)))) data <- do.call(rbind, data)

Comments

Post a Comment

Popular posts from this blog

c# - SharpSVN - How to get the previous revision? -

i trying find efficient way previous revision of file text comparison using sharpsvn. using (svnclient c = new svnclient()) { c.authentication.defaultcredentials = new networkcredential( configurationmanager.appsettings.get("svnserviceusername") , configurationmanager.appsettings.get("svnservicepassword") , configurationmanager.appsettings.get("svnservicedomain") ); c.authentication.sslservertrusthandlers += new eventhandler<svnsslservertrusteventargs>(authentication_sslservertrusthandlers); collection<svnfileversioneventargs> fileversioncollection = new collection<svnfileversioneventargs>(); svnrevisionrange range = new svnrevisionrange(0, this.hooks.revision); svnfileversionsargs args = new svnfileversionsargs(); args.retrieveproperties = true; args.range = range; foreach (svnchangeitem item in log.changedpaths) { string path = this.repositorypath + it...
Read more

c++ - Is it possible to compile a VST on linux? -

for class project i'm attempting write vst plugin backed cuda. current cuda workflow on linux box, i'd prefer compile , link there. according wikipedia , should possible (i couldn't find steinberg documentation relevant linux) can't find makefile or instructions on how build if aren't using xcode or visual studio. i'm vst 3 sdk doesn't support linux. when try compile plugin under linux, error: ./base/source/fatomic.cpp:39:30: fatal error: libkern/osatomic.h: no such file or directory this issue caused following code in "vst3 sdk/base/source/fatomic.cpp" #if mac #include <libkern/osatomic.h> #if mac_os_x_version_min_required > mac_os_x_version_10_4 #define native_atomic_type (volatile int32_t*) #else #define native_atomic_type (int32_t*) #endif #elif windows #include <windows.h> #endif but hope compiling under linux work vst sdk 2.4. reading. jvstwrapper seems run on lin...
Read more

url - Querystring manipulation of email Address in PHP -

i using third party application (email2http) send me emailid, body , message. unable retrieve email id due name appended on , enclosed < , >. here querystring getting. test.php?from=ajay+reddy &subject=cx&body=somebody when print variable in php returns name , not email id. $from = $_get['from']; echo $from; //output ajay reddy please suggest me how can emailid also. i dont want use post method due testing , debugging. it's working fine. forgot use htmlentities() in debugging.
Read more