An embedded and charset-unspecified text was scrubbed... Name: not available URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20120926/c57529d6/attachment.pl>
rows extraction
4 messages · Nico Met, David L Carlson, Jeff Newmiller +1 more
subtest <- subset(test, Name. %in% c("PKB123", "PKB22", "PKB23", "PKB32",
"CTV19", "CTV20", "PKB11", "PKB11"))
subtest
Name. Score performance Environment. 10 CTV19 2 0.52740797 0.53639048 11 CTV20 3 0.05298615 0.04856818 12 PKB11 4 0.90037809 0.79427806 13 PKB11 5 0.41806588 0.40839968 14 PKB123 5 0.16914593 0.17565094 15 PKB22 4 0.13450181 0.14681555 16 PKB23 3 0.05703352 0.04438428 17 PKB32 2 0.07606024 0.07606045 ---------------------------------------------- David L Carlson Associate Professor of Anthropology Texas A&M University College Station, TX 77843-4352
-----Original Message----- From: r-help-bounces at r-project.org [mailto:r-help-bounces at r- project.org] On Behalf Of Nico Met Sent: Wednesday, September 26, 2012 10:20 AM To: r-help Subject: [R] rows extraction Dear all, I want to extract rows from a data frame shown here as "test". For example: rows with with sorting PKB123 PKB22 PKB23 PKB32 CTV19 CTV20 PKB11 PKB11
dput(test)
structure(list(Name. = structure(c(1L, 2L, 3L, 4L, 5L, 6L, 7L,
8L, 9L, 10L, 11L, 12L, 12L, 13L, 14L, 15L, 16L, 17L, 18L, 19L,
19L), .Label = c("CTV10", "CTV11", "CTV12", "CTV13", "CTV14",
"CTV15", "CTV16", "CTV17", "CTV18", "CTV19", "CTV20", "PKB11",
"PKB123", "PKB22", "PKB23", "PKB32", "PKB54", "PKB55", "PKB65"
), class = "factor"), Score = c(1, 3, 4, 5, 2, 3, 4, 5, 6, 2,
3, 4, 5, 5, 4, 3, 2, 5, 6, 6, 2), performance = c(0.1885092462,
0.0794777814, 0.2503300253, 0.0378809048, 0.7203585833, 0.0517920055,
0.2064060066, 0.5514853303, 0.2605452552, 0.5274079653, 0.0529861537,
0.9003780927, 0.4180658816, 0.1691459321, 0.1345018054, 0.0570335197,
0.0760602378, 0.2203198271, 0.2233031679, 0.0355550859, 0.6791582042
), Environment. = c(0.1936732121, 0.1073581974, 0.2399158958,
0.0370952629, 0.6749189555, 0.0545192018, 0.2067554284, 0.4832804062,
0.2784950304, 0.5363904829, 0.0485681822, 0.7942780565, 0.4083996821,
0.175650937, 0.1468155515, 0.0443842831, 0.0760604527, 0.2029511384,
0.2486623715, 0.0362999435, 0.6409256796)), .Names = c("Name.",
"Score", "performance", "Environment."), class = "data.frame",
row.names =
c(NA,
21L))
regards
Nico
[[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.
You need to use the match function if you want to specify result sort order or duplication.
test[ match(c( "PKB123", "PKB22", "PKB23","PKB32", "CTV19", "CTV20", "PKB11", "PKB11" ),test$Name.), ]
---------------------------------------------------------------------------
Jeff Newmiller The ..... ..... Go Live...
DCN:<jdnewmil at dcn.davis.ca.us> Basics: ##.#. ##.#. Live Go...
Live: OO#.. Dead: OO#.. Playing
Research Engineer (Solar/Batteries O.O#. #.O#. with
/Software/Embedded Controllers) .OO#. .OO#. rocks...1k
---------------------------------------------------------------------------
Sent from my phone. Please excuse my brevity.
David L Carlson <dcarlson at tamu.edu> wrote:
subtest <- subset(test, Name. %in% c("PKB123", "PKB22", "PKB23",
"PKB32",
"CTV19", "CTV20", "PKB11", "PKB11"))
subtest
Name. Score performance Environment. 10 CTV19 2 0.52740797 0.53639048 11 CTV20 3 0.05298615 0.04856818 12 PKB11 4 0.90037809 0.79427806 13 PKB11 5 0.41806588 0.40839968 14 PKB123 5 0.16914593 0.17565094 15 PKB22 4 0.13450181 0.14681555 16 PKB23 3 0.05703352 0.04438428 17 PKB32 2 0.07606024 0.07606045 ---------------------------------------------- David L Carlson Associate Professor of Anthropology Texas A&M University College Station, TX 77843-4352
-----Original Message----- From: r-help-bounces at r-project.org [mailto:r-help-bounces at r- project.org] On Behalf Of Nico Met Sent: Wednesday, September 26, 2012 10:20 AM To: r-help Subject: [R] rows extraction Dear all, I want to extract rows from a data frame shown here as "test". For example: rows with with sorting PKB123 PKB22 PKB23 PKB32 CTV19 CTV20 PKB11 PKB11
dput(test)
structure(list(Name. = structure(c(1L, 2L, 3L, 4L, 5L, 6L, 7L,
8L, 9L, 10L, 11L, 12L, 12L, 13L, 14L, 15L, 16L, 17L, 18L, 19L,
19L), .Label = c("CTV10", "CTV11", "CTV12", "CTV13", "CTV14",
"CTV15", "CTV16", "CTV17", "CTV18", "CTV19", "CTV20", "PKB11",
"PKB123", "PKB22", "PKB23", "PKB32", "PKB54", "PKB55", "PKB65"
), class = "factor"), Score = c(1, 3, 4, 5, 2, 3, 4, 5, 6, 2,
3, 4, 5, 5, 4, 3, 2, 5, 6, 6, 2), performance = c(0.1885092462,
0.0794777814, 0.2503300253, 0.0378809048, 0.7203585833, 0.0517920055,
0.2064060066, 0.5514853303, 0.2605452552, 0.5274079653, 0.0529861537,
0.9003780927, 0.4180658816, 0.1691459321, 0.1345018054, 0.0570335197,
0.0760602378, 0.2203198271, 0.2233031679, 0.0355550859, 0.6791582042
), Environment. = c(0.1936732121, 0.1073581974, 0.2399158958,
0.0370952629, 0.6749189555, 0.0545192018, 0.2067554284, 0.4832804062,
0.2784950304, 0.5363904829, 0.0485681822, 0.7942780565, 0.4083996821,
0.175650937, 0.1468155515, 0.0443842831, 0.0760604527, 0.2029511384,
0.2486623715, 0.0362999435, 0.6409256796)), .Names = c("Name.",
"Score", "performance", "Environment."), class = "data.frame",
row.names =
c(NA,
21L))
regards
Nico
[[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.
______________________________________________ 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.
On Sep 26, 2012, at 8:28 AM, David L Carlson wrote:
subtest <- subset(test, Name. %in% c("PKB123", "PKB22", "PKB23", "PKB32",
"CTV19", "CTV20", "PKB11", "PKB11"))
subtest
Name. Score performance Environment. 10 CTV19 2 0.52740797 0.53639048 11 CTV20 3 0.05298615 0.04856818 12 PKB11 4 0.90037809 0.79427806 13 PKB11 5 0.41806588 0.40839968 14 PKB123 5 0.16914593 0.17565094 15 PKB22 4 0.13450181 0.14681555 16 PKB23 3 0.05703352 0.04438428 17 PKB32 2 0.07606024 0.07606045 ---------------------------------------------- David L Carlson Associate Professor of Anthropology Texas A&M University College Station, TX 77843-4352
I read the request as calling for a subsequent ordering:
subtest[match(subtest$Name., c("PKB123", "PKB22", "PKB23", "PKB32",
"CTV19", "CTV20", "PKB11", "PKB11") ), ]
Name. Score performance Environment.
14 PKB123 5 0.16914593 0.17565094
15 PKB22 4 0.13450181 0.14681555
16 PKB23 3 0.05703352 0.04438428
16.1 PKB23 3 0.05703352 0.04438428
10 CTV19 2 0.52740797 0.53639048
11 CTV20 3 0.05298615 0.04856818
12 PKB11 4 0.90037809 0.79427806
13 PKB11 5 0.41806588 0.40839968
-----Original Message----- From: r-help-bounces at r-project.org [mailto:r-help-bounces at r- project.org] On Behalf Of Nico Met Sent: Wednesday, September 26, 2012 10:20 AM To: r-help Subject: [R] rows extraction Dear all, I want to extract rows from a data frame shown here as "test". For example: rows with with sorting PKB123 PKB22 PKB23 PKB32 CTV19 CTV20 PKB11 PKB11
dput(test)
structure(list(Name. = structure(c(1L, 2L, 3L, 4L, 5L, 6L, 7L,
8L, 9L, 10L, 11L, 12L, 12L, 13L, 14L, 15L, 16L, 17L, 18L, 19L,
19L), .Label = c("CTV10", "CTV11", "CTV12", "CTV13", "CTV14",
"CTV15", "CTV16", "CTV17", "CTV18", "CTV19", "CTV20", "PKB11",
"PKB123", "PKB22", "PKB23", "PKB32", "PKB54", "PKB55", "PKB65"
), class = "factor"), Score = c(1, 3, 4, 5, 2, 3, 4, 5, 6, 2,
3, 4, 5, 5, 4, 3, 2, 5, 6, 6, 2), performance = c(0.1885092462,
0.0794777814, 0.2503300253, 0.0378809048, 0.7203585833, 0.0517920055,
0.2064060066, 0.5514853303, 0.2605452552, 0.5274079653, 0.0529861537,
0.9003780927, 0.4180658816, 0.1691459321, 0.1345018054, 0.0570335197,
0.0760602378, 0.2203198271, 0.2233031679, 0.0355550859, 0.6791582042
), Environment. = c(0.1936732121, 0.1073581974, 0.2399158958,
0.0370952629, 0.6749189555, 0.0545192018, 0.2067554284, 0.4832804062,
0.2784950304, 0.5363904829, 0.0485681822, 0.7942780565, 0.4083996821,
0.175650937, 0.1468155515, 0.0443842831, 0.0760604527, 0.2029511384,
0.2486623715, 0.0362999435, 0.6409256796)), .Names = c("Name.",
"Score", "performance", "Environment."), class = "data.frame",
row.names =
c(NA,
21L))
regards
Nico
David Winsemius, MD Alameda, CA, USA