merge - R: why is merge_recurse failing? -


the undocumented merge_recurse() function hadley's reshape package recommended on site merging multiple dataframes one. can me figure out why failing me?

df1 <- data.frame(id=1:10, y=runif(10)) df2 <- data.frame(id=1:10, y=runif(10)) df3 <- data.frame(id=1:10, y=runif(10))  merge(df1,        merge(df2, df3, = true, sort = false, by="id"),       = true, sort = false, by="id")  merge_recurse(list(df1,df2,df3), by="id")

from reading of merge_recurse code, 2 statements above should produce same output, don't. merge_recurse() seems weird combination of merging columns , rows, whereas explicit merge() statement intended.

> merge(df1,  +       merge(df2, df3, = true, sort = false, by="id"), +       = true, sort = false, by="id")    id         y        y.x       y.y 1   1 0.3442246 0.40752170 0.7543310 2   2 0.6855180 0.90333706 0.9078623 3   3 0.5824061 0.94068441 0.3569613 4   4 0.8609505 0.03080645 0.5408886 5   5 0.6165643 0.19211396 0.3239516 6   6 0.7091000 0.83652412 0.9922271 7   7 0.4040763 0.07829698 0.3626811 8   8 0.6638416 0.92631462 0.9887723 9   9 0.0425038 0.95156785 0.2350344 10 10 0.9128549 0.65482298 0.1854737  > merge_recurse(list(df1,df2,df3), by="id")    id       y.x        y.y 1   1 0.3442246 0.40752170 2   1 0.3442246 0.75433099 3   2 0.6855180 0.90333706 4   2 0.6855180 0.90786227 5   3 0.5824061 0.35696133 6   3 0.5824061 0.94068441 7   4 0.8609505 0.54088859 8   4 0.8609505 0.03080645 9   5 0.6165643 0.19211396 10  5 0.6165643 0.32395157 11  6 0.7091000 0.83652412 12  6 0.7091000 0.99222707 13  7 0.4040763 0.36268111  [ reached getoption("max.print") -- omitted 7 rows ]  > sessioninfo() r version 3.0.3 (2014-03-06) platform: x86_64-unknown-linux-gnu (64-bit)  locale: [1] c  attached base packages: [1] stats     graphics  grdevices utils     datasets  methods   base       other attached packages: [1] reshape_0.8.4 plyr_1.8.1     loaded via namespace (and not attached): [1] rcpp_0.11.1    compiler_3.0.3 tools_3.0.3

i found out why happening - bug in reshape::merge_recurse().

> merge_recurse function (dfs, ...)  {     if (length(dfs) == 2) {         merge(dfs[[1]], dfs[[2]], = true, sort = false, ...)     }     else {         merge(dfs[[1]], recall(dfs[-1]), = true, sort = false,              ...)     } } <environment: namespace:reshape>

note '...' missing call recall() should read, 

merge_recurse <- function (dfs, ...)      {         if (length(dfs) == 2) {             merge(dfs[[1]], dfs[[2]], = true, sort = false, ...)         }         else {             merge(dfs[[1]], recall(dfs[-1], ...), = true, sort = false,                    ...)         }     }

how have escaped notice long?


Comments

Post a Comment

Popular posts from this blog

javascript - jquery or ashx not working -

i using ajax file upload control. it creating html: <form action="/pages/handlers/asyncfileuploadhandler.ashx" method="post" enctype="multipart/form-data" target="ajaxuploader-iframe-1397144545"> <input type="hidden" name="type" value="mindvoice"> <input type="file" id="imagefile" style="display: block; width: 80%; margin-right: auto; margin-left: auto;"> </form> and target is: <iframe width="0" height="0" style="display:none;" name="ajaxuploader-iframe-1397144545" id="ajaxuploader-iframe-1397144545"></iframe> the form submitted using .submit() . my ashx handler: <%@ webhandler language="c#" class="asyncfileuploadhandler" %> using system; using system.web; using nettpals.core; public class asyncfileuploadhandler : ihttphandler { public void processre...
Read more

opencv - DataType<cv::detail::deriv_type>::depth what is it used for -

i wondering why line used in lucas kanade tracker in opencv: datatype<cv::detail::deriv_type>::depth can explain me? in opencv, depth of mat refers type of data contained in mat 's data buffer. represented integer values correspond given data type. these integers commonly abstracted appropriate macro definition (e.g. uchar data represented macro cv_8u ). cv::datatype type-traits class provides method obtain corresponding integer value without having memorize macro means data type. there few cases user code needs use datatype::depth . more common datatype::type . a simple example shows 1 possible use of datatype::depth : cv::mat uchar_data = cv::mat::ones(3, 3, cv_8uc1); cv::mat float_data; uchar_data.convertto(float_data, cv::datatype<float>::depth); // ^^ equivalently replaced // cv_32f macro float_data.at<float>(0,1) += 0.5f; std::cout << float_data << std::endl;...
Read more

python 3.x - Mapping specific letters onto a list of words -

can please suggest approach write piece of codes automatically maps letter in letter_str onto dic_key (a dict key string type contains dashes match length of words in word_lst)? so, mapping occurs if letter appears in every words in list @ same position no matter how many words in list. if no letter appears @ position words in word list new_dic_key '----'. please see examples below thanks word_lst = ['ague', 'bute', 'byre', 'came', 'case', 'doze'] dic_key = '----' letters_str ='abcdefghijklmnopqrstuvwxyz' new_dic_key = '---e' if word_list = ['bute', 'byre'] new_dic_key = 'b--e' or word_list = ['drek', 'drew', 'dyes'] new_dic_key = 'd-e-' if words in word_list of same length code give want: word_list = ['drek', 'drew', 'dyes'] cols = [] in range(len(word_list[0])): cols.append([]) word in ...
Read more