Set metadata from a tissue slide.

Write the metadata stored with a tissue slide object. To get the metadata, use the function get_slide_metadata().

set_slide_metadata(ts, metadata)

Arguments

ts	A Tissue slide object.
metadata	Metadata of arbitrary structure.

Value

Returns the tissue slide object with the metadata.

Examples

slide <- tissue_slide(pancreas, metadata = list(tissue = "pancreas", mouse = "OP24"))
slide <- set_slide_metadata(slide, list(tissue = "not pancreas", mouse = "Mickey"))
get_slide_metadata(slide)
#> $tissue
#> [1] "not pancreas"
#> 
#> $mouse
#> [1] "Mickey"
#>