Message-ID: <644e1f320903200929q73aceb70h95e12d611c21385@mail.gmail.com>
Date: 2009-03-20T16:29:36Z
From: jim holtman
Subject: struggling with pairlists
In-Reply-To: <6B32C438581E5D4C8A34C377C3B334A401752A0A@FBCMST11V04.fbc.local>
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?