Function to bind objects together into a longer object.

Share:

Description

From multiple download*s, dataset*s or sites, join them together into a single object.

Usage

1
bind(x, ...)

Arguments

x

An object returned by one of the get_* commands for download, site or dataset.

...

other objects of the same class.

Details

To support further synthesis and analysis compile_download works to transform a list returned by get_download into a large data frame with columns for site and sample attributes and also with the associated assemblage data at each sample depth. This function also does the same for single sites.

Value

This command returns a larger list.

Author(s)

Simon J. Goring simon.j.goring@gmail.com

References

Neotoma Project Website: http://www.neotomadb.org

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
## Not run: 
#  Search for sites with "Thuja" pollen that are older than 8kyr BP and
#  that are on the west coast of North America:
t8kyr.poa <- get_dataset(taxonname="Thuja*", 
                         loc=c(-150, 20, -100, 60), ageyoung = 8000)
t8kyr.canis <- get_dataset(taxonname="Canis*", 
                           loc=c(-150, 20, -100, 60), ageyoung = 8000)

t8kyr.co_site <- bind(t8kyr.poa, t8kyr.canis)
plot(t8kyr.co_site)

####
# Download dataset data across four dataset types along the forest prairie boundary:
# We want to look at four different dataset types across a forest prairie boundary:
dataset_types <- c("ostracode surface sample",
                   "water chemistry",
                   "diatom surface sample",
                   "pollen surface sample")

# Run the "get_dataset` function for each of the different dataset types 
dataset_lists <- lapply(dataset_types, 
                          function(x) { 
                            get_dataset(datasettype=x, 
                                        loc = c(-100,43,-92,48))
                                        })

# Using do.call here to make sure that I don"t have to split the list out.
new_datasets <- do.call(bind, dataset_lists)

# And voila!
plot(new_datasets)


## End(Not run)

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.