Difference between revisions of "RPR-OBJECTS-Lists"
m |
m (Boris moved page RPR-Objects-Lists to RPR-OBJECTS-Lists) |
||
(11 intermediate revisions by the same user not shown) | |||
Line 1: | Line 1: | ||
− | <div id=" | + | <div id="ABC"> |
− | + | <div style="padding:5px; border:1px solid #000000; background-color:#b3dbce; font-size:300%; font-weight:400; color: #000000; width:100%;"> | |
R "Lists" | R "Lists" | ||
− | + | <div style="padding:5px; margin-top:20px; margin-bottom:10px; background-color:#b3dbce; font-size:30%; font-weight:200; color: #000000; "> | |
− | + | (R Lists) | |
− | + | </div> | |
− | |||
− | <div | ||
− | |||
− | |||
</div> | </div> | ||
− | {{ | + | {{Smallvspace}} |
− | + | <div style="padding:5px; border:1px solid #000000; background-color:#b3dbce33; font-size:85%;"> | |
− | + | <div style="font-size:118%;"> | |
− | + | <b>Abstract:</b><br /> | |
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | < | ||
− | <div | ||
− | |||
<section begin=abstract /> | <section begin=abstract /> | ||
− | + | Introduction to R list data types: properties, how to create, and modify them and how to retrieve data. | |
− | |||
<section end=abstract /> | <section end=abstract /> | ||
− | + | </div> | |
− | + | <!-- ============================ --> | |
− | + | <hr> | |
− | + | <table> | |
− | == | + | <tr> |
− | === | + | <td style="padding:10px;"> |
− | < | + | <b>Objectives:</b><br /> |
− | < | ||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | < | ||
This unit will ... | This unit will ... | ||
− | * ... introduce ; | + | * ... introduce R lists; |
− | * ... | + | * ... cover a number of basic operations. |
− | * ... | + | </td> |
+ | <td style="padding:10px;"> | ||
+ | <b>Outcomes:</b><br /> | ||
+ | After working through this unit you ... | ||
+ | * ... know how to create and manipulate lists; | ||
+ | * ... can extract items from lists. | ||
+ | </td> | ||
+ | </tr> | ||
+ | </table> | ||
+ | <!-- ============================ --> | ||
+ | <hr> | ||
+ | <b>Deliverables:</b><br /> | ||
+ | <section begin=deliverables /> | ||
+ | <ul> | ||
+ | <li><b>Time management</b>: Before you begin, estimate how long it will take you to complete this unit. Then, record in your course journal: the number of hours you estimated, the number of hours you worked on the unit, and the amount of time that passed between start and completion of this unit.</li> | ||
+ | <li><b>Journal</b>: Document your progress in your [[FND-Journal|Course Journal]]. Some tasks may ask you to include specific items in your journal. Don't overlook these.</li> | ||
+ | <li><b>Insights</b>: If you find something particularly noteworthy about this unit, make a note in your [[ABC-Insights|'''insights!''' page]].</li> | ||
+ | </ul> | ||
+ | <section end=deliverables /> | ||
+ | <!-- ============================ --> | ||
+ | <hr> | ||
+ | <section begin=prerequisites /> | ||
+ | <b>Prerequisites:</b><br /> | ||
+ | <ul> | ||
+ | This unit builds on material covered in the following prerequisite units:<br /> | ||
+ | *[[RPR-Objects-Data_frames|RPR-Objects-Data_frames (R "data frames"")]] | ||
+ | </ul> | ||
+ | <section end=prerequisites /> | ||
+ | <!-- ============================ --> | ||
+ | </div> | ||
− | {{ | + | {{Smallvspace}} |
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | {{ | + | {{Smallvspace}} |
− | + | __TOC__ | |
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
{{Vspace}} | {{Vspace}} | ||
Line 78: | Line 70: | ||
=== Evaluation === | === Evaluation === | ||
− | |||
− | |||
<b>Evaluation: NA</b><br /> | <b>Evaluation: NA</b><br /> | ||
− | :This unit is not evaluated for course marks. | + | <div style="margin-left: 2rem;">This unit is not evaluated for course marks.</div> |
+ | == Contents == | ||
+ | |||
+ | {{task| 1= | ||
+ | * Load the <code>R-Exercise_BasicSetup</code> project in RStudio if you don't already have it open. | ||
+ | * Type <code>init()</code> as instructed after the project has loaded. | ||
+ | * Continue below. | ||
+ | }} | ||
{{Vspace}} | {{Vspace}} | ||
− | |||
− | |||
− | |||
− | |||
− | |||
===Lists=== | ===Lists=== | ||
+ | The elements of matrices and arrays all have to be of the same type. Data frames allow us to store elements of different types in columns, but all columns have to have the same length and the elements have to be "atomic" - i.e. you can't put vectors into dataframe columns. But R's '''lists''' are much more versatile. They are simply ordered collections of ''components''. These components can have different type - all kinds of R objects can go into a list: characters, booleans, any kind of numeric data, even functions - AND they can have different size. | ||
− | + | Lists are created with the <code>list()</code> function, which works similar to the <code>c()</code> function for vectors. Components are accessed through their index in double square brackets, or through their name, using the "$" operator, if the name has been defined. Here is an example: | |
− | + | <pre> | |
− | < | + | pUC19 <- list(size=2686, marker="ampicillin", ori="ColE1", accession="L01397", BanI=c(235, 408, 550, 1647) ) |
− | pUC19 | + | objectInfo(pUC19) |
pUC19[[1]] | pUC19[[1]] | ||
pUC19[[2]] | pUC19[[2]] | ||
Line 105: | Line 98: | ||
pUC19$BanI[2] | pUC19$BanI[2] | ||
− | </ | + | </pre> |
− | Note that in | + | Note that in our <code>data.frame()</code> example, we stored multiple restriction enzymes in '''one''' string, separated by commas. While we can take such strings apart again, by using the <code>strsplit()</code> function, the string itself still has to be one single element in the data frame's column. Lists have no such restriction. In our example above, we assigned a vector of restriction site positions to the element "BanI". |
− | + | You can easily imagine that we could now create a list of lists, and that list of lists could hold an entire plasmid database in a most versatile way. Let's do this! | |
− | {{ | + | {{task|1= |
+ | * Create a list like the one above with data for pACYC184 following the structure for the pUC19 example but using only size, marker and ori data: | ||
+ | : size: 4245 | ||
+ | : marker: Tet, Cam | ||
+ | : ori: p15A | ||
− | + | * Confirm that your new list's structure looks the pUC19 one (minus "accession", and the "BanI"" element). | |
− | + | * Make a new list, call it plasmidDB and assign to it the puc19 list: | |
− | < | + | <pre> |
− | < | + | plasmidDB <- list() |
+ | plasmidDB[["pUC19"]] <- pUC19 | ||
+ | </pre> | ||
+ | * Add your pACYC184 list | ||
+ | * Add a third element to plasmidDB, "pBR322" using the pBR322 data: | ||
+ | : size: 4361 | ||
+ | : marker: Amp, Tet | ||
+ | : ori: ColE1 | ||
− | |||
+ | Then: | ||
+ | * retrieve the entire pACYC184 list | ||
− | + | Whereas data frames allow you to get all data from a column directly, this is not possible for lists. You need a function that iterates over all list elements instead. Such a function is <code>lapply()</code>, one of several "apply" functions. For example, to get all "ori" elements, try: | |
− | |||
− | |||
− | |||
− | { | + | <pre> |
+ | lapply(plasmidDB, function(x) { return(x$ori) }) | ||
+ | </pre> | ||
+ | * Retrieve all sizes from the list. Use <code>unlist()</code> to flatten the result. Then use <code>min()</code> to find the size of the smallest one. | ||
− | < | + | <div class="toccolours mw-collapsible mw-collapsed" style="width:800px"> |
− | <div | + | Lost? Solutions here (but don't peek). |
− | == | + | <div class="mw-collapsible-content"> |
− | < | + | <pre> |
− | < | + | pUC19 <- list(size=2686, marker="ampicillin", ori="ColE1", accession="L01397", BanI=c(235, 408, 550, 1647) ) |
− | + | pACYC184 <- list(size=4245, marker="Tet, Cam", ori="p15A" ) | |
+ | |||
+ | plasmidDB <- list() | ||
+ | plasmidDB[["pUC19"]] <- pUC19 | ||
+ | plasmidDB[["pACYC184"]] <- pACYC184 | ||
+ | plasmidDB[["pBR322"]] <- list(size=4361, marker="Amp, Tet", ori="ColE1" ) | ||
− | + | plasmidDB[["pACYC184"]] # retrieve the entire pACYC184 list | |
− | < | + | lapply(plasmidDB, function(x) { return(x$ori) }) |
− | + | x <- unlist(lapply(plasmidDB, function(x) { return(x$size) })) | |
− | < | + | min(x) |
− | + | # or, to get the name too ... | |
+ | x[x == min(x)] | ||
+ | </pre> | ||
</div> | </div> | ||
− | + | </div> | |
+ | |||
+ | |||
+ | }} | ||
− | |||
− | |||
{{Vspace}} | {{Vspace}} | ||
+ | == Self-evaluation == | ||
+ | === Question 1=== | ||
− | + | Execute: <code>x <- strsplit(plasmidData$Sites, ", ")</code> and analyze the result. | |
+ | * (A) What is <code>plasmidData$Sites</code>? | ||
+ | * (B) What is <code>x</code>? | ||
+ | * (C) Why does <code>strsplit()</code> have a list as return value, not a vector or a data frame? | ||
+ | <div class="toccolours mw-collapsible mw-collapsed" style="width:800px"> | ||
+ | Answer ... | ||
+ | <div class="mw-collapsible-content"> | ||
+ | * (A) A vector of strings (character elements). | ||
+ | * (B) A list of vectors. | ||
+ | * (C) Because <code>strsplit()</code> is vectorized and operates on all elements of the vector <code>plasmidData$Sites</code>. But the function doesn't know in advance how many elements the result is going to have for each element. So it needs to output vectors of different lengths. And the only way to combine them into a single value (note: all R functions return only a single value) is by collecting them in a list. | ||
− | < | + | </div> |
− | + | </div> | |
− | |||
{{Vspace}} | {{Vspace}} | ||
− | |||
− | + | {{Vspace}} | |
− | |||
<div class="about"> | <div class="about"> | ||
Line 179: | Line 200: | ||
:2017-08-05 | :2017-08-05 | ||
<b>Modified:</b><br /> | <b>Modified:</b><br /> | ||
− | : | + | :2020-09-17 |
<b>Version:</b><br /> | <b>Version:</b><br /> | ||
− | :1.0 | + | :1.0.3 |
<b>Version history:</b><br /> | <b>Version history:</b><br /> | ||
− | *1.0 Completed to first live version | + | *1.0.3 Maintenace |
− | *0.1 Material collected from previous tutorial | + | *1.0.2 Maintenace |
+ | *1.0.1 Fixed error in list example | ||
+ | *1.0 Completed to first live version | ||
+ | *0.1 Material collected from previous tutorial | ||
</div> | </div> | ||
− | |||
− | |||
{{CC-BY}} | {{CC-BY}} | ||
+ | [[Category:ABC-units]] | ||
+ | {{UNIT}} | ||
+ | {{LIVE}} | ||
</div> | </div> | ||
<!-- [END] --> | <!-- [END] --> |
Latest revision as of 01:07, 6 September 2021
R "Lists"
(R Lists)
Abstract:
Introduction to R list data types: properties, how to create, and modify them and how to retrieve data.
Objectives:
|
Outcomes:
|
Deliverables:
- Time management: Before you begin, estimate how long it will take you to complete this unit. Then, record in your course journal: the number of hours you estimated, the number of hours you worked on the unit, and the amount of time that passed between start and completion of this unit.
- Journal: Document your progress in your Course Journal. Some tasks may ask you to include specific items in your journal. Don't overlook these.
- Insights: If you find something particularly noteworthy about this unit, make a note in your insights! page.
Prerequisites:
-
This unit builds on material covered in the following prerequisite units:
Evaluation
Evaluation: NA
Contents
Task:
- Load the
R-Exercise_BasicSetup
project in RStudio if you don't already have it open. - Type
init()
as instructed after the project has loaded. - Continue below.
Lists
The elements of matrices and arrays all have to be of the same type. Data frames allow us to store elements of different types in columns, but all columns have to have the same length and the elements have to be "atomic" - i.e. you can't put vectors into dataframe columns. But R's lists are much more versatile. They are simply ordered collections of components. These components can have different type - all kinds of R objects can go into a list: characters, booleans, any kind of numeric data, even functions - AND they can have different size.
Lists are created with the list()
function, which works similar to the c()
function for vectors. Components are accessed through their index in double square brackets, or through their name, using the "$" operator, if the name has been defined. Here is an example:
pUC19 <- list(size=2686, marker="ampicillin", ori="ColE1", accession="L01397", BanI=c(235, 408, 550, 1647) ) objectInfo(pUC19) pUC19[[1]] pUC19[[2]] pUC19$ori pUC19$BanI[2]
Note that in our data.frame()
example, we stored multiple restriction enzymes in one string, separated by commas. While we can take such strings apart again, by using the strsplit()
function, the string itself still has to be one single element in the data frame's column. Lists have no such restriction. In our example above, we assigned a vector of restriction site positions to the element "BanI".
You can easily imagine that we could now create a list of lists, and that list of lists could hold an entire plasmid database in a most versatile way. Let's do this!
Task:
- Create a list like the one above with data for pACYC184 following the structure for the pUC19 example but using only size, marker and ori data:
- size: 4245
- marker: Tet, Cam
- ori: p15A
- Confirm that your new list's structure looks the pUC19 one (minus "accession", and the "BanI"" element).
- Make a new list, call it plasmidDB and assign to it the puc19 list:
plasmidDB <- list() plasmidDB[["pUC19"]] <- pUC19
- Add your pACYC184 list
- Add a third element to plasmidDB, "pBR322" using the pBR322 data:
- size: 4361
- marker: Amp, Tet
- ori: ColE1
Then:
- retrieve the entire pACYC184 list
Whereas data frames allow you to get all data from a column directly, this is not possible for lists. You need a function that iterates over all list elements instead. Such a function is lapply()
, one of several "apply" functions. For example, to get all "ori" elements, try:
lapply(plasmidDB, function(x) { return(x$ori) })
- Retrieve all sizes from the list. Use
unlist()
to flatten the result. Then usemin()
to find the size of the smallest one.
Lost? Solutions here (but don't peek).
pUC19 <- list(size=2686, marker="ampicillin", ori="ColE1", accession="L01397", BanI=c(235, 408, 550, 1647) ) pACYC184 <- list(size=4245, marker="Tet, Cam", ori="p15A" ) plasmidDB <- list() plasmidDB[["pUC19"]] <- pUC19 plasmidDB[["pACYC184"]] <- pACYC184 plasmidDB[["pBR322"]] <- list(size=4361, marker="Amp, Tet", ori="ColE1" ) plasmidDB[["pACYC184"]] # retrieve the entire pACYC184 list lapply(plasmidDB, function(x) { return(x$ori) }) x <- unlist(lapply(plasmidDB, function(x) { return(x$size) })) min(x) # or, to get the name too ... x[x == min(x)]
Self-evaluation
Question 1
Execute: x <- strsplit(plasmidData$Sites, ", ")
and analyze the result.
- (A) What is
plasmidData$Sites
? - (B) What is
x
? - (C) Why does
strsplit()
have a list as return value, not a vector or a data frame?
Answer ...
- (A) A vector of strings (character elements).
- (B) A list of vectors.
- (C) Because
strsplit()
is vectorized and operates on all elements of the vectorplasmidData$Sites
. But the function doesn't know in advance how many elements the result is going to have for each element. So it needs to output vectors of different lengths. And the only way to combine them into a single value (note: all R functions return only a single value) is by collecting them in a list.
About ...
Author:
- Boris Steipe <boris.steipe@utoronto.ca>
Created:
- 2017-08-05
Modified:
- 2020-09-17
Version:
- 1.0.3
Version history:
- 1.0.3 Maintenace
- 1.0.2 Maintenace
- 1.0.1 Fixed error in list example
- 1.0 Completed to first live version
- 0.1 Material collected from previous tutorial
This copyrighted material is licensed under a Creative Commons Attribution 4.0 International License. Follow the link to learn more.