[R] struggling with pairlists

jim holtman jholtman at gmail.com
Fri Mar 20 17:29:36 CET 2009


It was not clear what you were asking for.  Did you want a 'list' of
'lists' pairs?  What are you going to use the data for?  How are you
expecting to access it?  This will create a list similar to:

z <- list(list(variable="TrendOff", value=0), list(.......


> flags_val <- c( 0,1,1,1,4,1,1,1,4,1,1,1,4,1,1,1,4,1,1)
>  flags_nam <- c("TrendOff","MOdwt","ZeroPadding",
+                 "Step1HSOff","Step1NumHSOff","Step1NumHSOff","Step1ExtOff",
+                 "Step2HSOff","Step2NumHSOff","Step2NumHSOff","Step2ExtOff",
+                "Step3HSOff","Step3NumHSOff","Step3NumHSOff","Step3ExtOff",
+                "Step4HSOff","Step4NumHSOff","Step4NumHSOff","Step4ExtOff" )
> x <- lapply(seq_along(flags_val), function(z){
+     list(variable=flags_nam[z], value=flags_val[z])
+ })
> dput(x)
list(structure(list(variable = "TrendOff", value = 0), .Names = c("variable",
"value")), structure(list(variable = "MOdwt", value = 1), .Names =
c("variable",
"value")), structure(list(variable = "ZeroPadding", value = 1), .Names
= c("variable",
"value")), structure(list(variable = "Step1HSOff", value = 1), .Names
= c("variable",
"value")), structure(list(variable = "Step1NumHSOff", value = 4),
.Names = c("variable",
"value")), structure(list(variable = "Step1NumHSOff", value = 1),
.Names = c("variable",
"value")), structure(list(variable = "Step1ExtOff", value = 1), .Names
= c("variable",
"value")), structure(list(variable = "Step2HSOff", value = 1), .Names
= c("variable",
"value")), structure(list(variable = "Step2NumHSOff", value = 4),
.Names = c("variable",
"value")), structure(list(variable = "Step2NumHSOff", value = 1),
.Names = c("variable",
"value")), structure(list(variable = "Step2ExtOff", value = 1), .Names
= c("variable",
"value")), structure(list(variable = "Step3HSOff", value = 1), .Names
= c("variable",
"value")), structure(list(variable = "Step3NumHSOff", value = 4),
.Names = c("variable",
"value")), structure(list(variable = "Step3NumHSOff", value = 1),
.Names = c("variable",
"value")), structure(list(variable = "Step3ExtOff", value = 1), .Names
= c("variable",
"value")), structure(list(variable = "Step4HSOff", value = 1), .Names
= c("variable",
"value")), structure(list(variable = "Step4NumHSOff", value = 4),
.Names = c("variable",
"value")), structure(list(variable = "Step4NumHSOff", value = 1),
.Names = c("variable",
"value")), structure(list(variable = "Step4ExtOff", value = 1), .Names
= c("variable",
"value")))
>


On Fri, Mar 20, 2009 at 12:10 PM,  <mauede at alice.it> wrote:
> I would like to create a vector of pairlist (flag, binary_value)  like:
>
>  (variable ="TrendOff",     value = 0)
>  (variable ="MOdwt",        value = 1)
>  (variable ? "ZeroPadding", value =1)
>  ................................................
>
> I tried the following syntax but the emcompassing list (that I called "flags") is not made up of pairlists. Instead it is
> made up of two apparently disjoint lists:
>
>
>> flags_val <- c( 0,1,1,1,4,1,1,1,4,1,1,1,4,1,1,1,4,1,1)
>>  flags_nam <- c("TrendOff","MOdwt","ZeroPadding",
> +                 "Step1HSOff","Step1NumHSOff","Step1NumHSOff","Step1ExtOff",
> +                 "Step2HSOff","Step2NumHSOff","Step2NumHSOff","Step2ExtOff",
> +                 "Step3HSOff","Step3NumHSOff","Step3NumHSOff","Step3ExtOff",
> +                 "Step4HSOff","Step4NumHSOff","Step4NumHSOff","Step4ExtOff" )
>>  flags_nam
>  [1] "TrendOff"      "MOdwt"         "ZeroPadding"   "Step1HSOff"    "Step1NumHSOff" "Step1NumHSOff"
>  [7] "Step1ExtOff"   "Step2HSOff"    "Step2NumHSOff" "Step2NumHSOff" "Step2ExtOff"   "Step3HSOff"
> [13] "Step3NumHSOff" "Step3NumHSOff" "Step3ExtOff"   "Step4HSOff"    "Step4NumHSOff" "Step4NumHSOff"
> [19] "Step4ExtOff"
>> flags <- pairlist (data = flags_val, variable = flags_nam)
>> flags
> $data
>  [1] 0 1 1 1 4 1 1 1 4 1 1 1 4 1 1 1 4 1 1
>
> $variable
>  [1] "TrendOff"      "MOdwt"         "ZeroPadding"   "Step1HSOff"    "Step1NumHSOff" "Step1NumHSOff"
>  [7] "Step1ExtOff"   "Step2HSOff"    "Step2NumHSOff" "Step2NumHSOff" "Step2ExtOff"   "Step3HSOff"
> [13] "Step3NumHSOff" "Step3NumHSOff" "Step3ExtOff"   "Step4HSOff"    "Step4NumHSOff" "Step4NumHSOff"
> [19] "Step4ExtOff"
>
>
> Please, can someone teach me how to create a vector of pairlists ?
> I could find no illustrating on-line example.
> Thank you very much.
> Maura
>
>
>
> tutti i telefonini TIM!
>
>
>        [[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.
>



-- 
Jim Holtman
Cincinnati, OH
+1 513 646 9390

What is the problem that you are trying to solve?




More information about the R-help mailing list