R: variable name to string -

-

there simple solutions such as:

> deparse(substitute(data)) [1] "data"

but not quite work when want extract name list:

> deparse(substitute(names(data)[1])) [1] "names(data)[1]"

so problem want general solution every variable in list/data frame/numeric feed function. , want see names of variables column names output data frame.

such as:

foo <- function(...) {     data <- list(...) ## magic here ##    names(output_df) <- ??     output_df }

and keep in mind numerics fed ... don't come names attribute. whole reason why want use environment name column name in output data frame.

so apparently, "??" in question above should substituted with:

setdiff(as.character(match.call(expand.dots=true)),          as.character(match.call(expand.dots=false)))

with expanded example:

num_vec <- as.numeric(1:10) list1 <- 1:10 list2 <- 11:20 list_data <- list(list1, list2) df_data <- data.frame(list1, list2)  foo <- function(...) {   input_list <- list(...)   name_vec <- setdiff(as.character(match.call(expand.dots=true)),                        as.character(match.call(expand.dots=false)))   output_df <- list()   for(i in 1:length(input_list)) {     output_df <- c(output_df, input_list[i])   }   output_df <- data.frame(output_df)   names(output_df) <- name_vec   output_df }  foo(num_vec, list_data[[1]], df_data[[1]], df_data$list2)     num_vec list_data[[1]] df_data[[1]] df_data$list2 1        1              1            1            11 2        2              2            2            12 3        3              3            3            13 4        4              4            4            14 5        5              5            5            15 6        6              6            6            16 7        7              7            7            17 8        8              8            8            18 9        9              9            9            19 10      10             10           10            20

this intention - data sort of source, manipulations (not shown in example not related problem) , data frame output column names appear in function variables.

thanks peyton pointing out solution in other post failed find through search.


Comments

Post a Comment

Popular posts from this blog

C# random value from dictionary and tuple -

-
i have following code, , need random item contains string "region_1" dictionary. public static dictionary<int, tuple<string, int, currencytype>> itemarray = new dictionary<int, tuple<string, int, currencytype>>() { { 0xb3e, new tuple<string, int, currencytype>("region_1", 1500, currencytype.fame) } }; public static int generateitemid(string shopid) { var generateditem = itemarray.elementat(new random().next(0, itemarray.count)).key; } how select this? it's not possible efficiently... first create static random @ class level... prevent non-random behaviour if run query on short period of time... (it's seeded discrete clock) static random rnd = new random(); then: var item = itemarray.values .where(t => t.item1 == shopid) .orderby(_ => rnd.next()) .firstordefault()
Read more

cgi - How do I interpret URLs without extension as files rather than missing directories in nginx? -

-
so i'm trying install zoneminder , have run under nginx, has few compiled files need run using fast-cgi. these files lack extension. if file has extension, there no issue , nginx interprets file , return 404 if can't find it. if has no extension, assume it's directory , return 404 when can't find sort of index page. here have now: # security camera domain. server { listen 888; server_name mydomain.com; root /srv/http/zm; # enable php support. include php.conf; location / { index index.html index.htm index.php; } # enable cgi support. location ~ ^/cgi-bin/(.+)$ { alias /srv/cgi-bin/zm/; fastcgi_pass unix:/run/fcgiwrap.sock; fastcgi_param script_filename $document_root/$1; include fastcgi.conf; } } the idea is, under cgi-bin directory goes through fastcgi pipe. any idea on howi can fix this? upon closer inspection, realized zoneminder has 2 cgi sc...
Read more

.htaccess - htaccess convert request to clean url and add slash at the end of the url -

-
ok , searched more 4 days , more 20 posts here in stach or in websites without kind of success first here htaccess file rewriteengine on rewriterule ^([a-za-z0-9_]+)/?$ index.php?page=$1 [nc] rewriterule ^([a-za-z0-9_]+)\/([a-za-z0-9_]+)\/?$ index.php?page=$1&action=$2 [nc] i tried many codes 1 worked me can call request , works me www.example.com/pagename => www.example.com/index.php?page=pagename here questions , please provide me information "in detail" understand code well 1- how convert request automatically www.example.com/index.php?page=pagename www.example.com/pagename 2- if tried add slash @ end shows me page without images or styling mean www.example.com/pagename => works www.example.com/pagename/ => doesn't work that's :) for first part need 301 rule this: rewritecond %{the_request} /index\.php\?page=([^\s&]+) [nc] rewriterule ^ /%1? [r=301,l] for second part use absolute path in css, js, images files r...
Read more