Skip to content

Commit

Permalink
Comment out vignette code
Browse files Browse the repository at this point in the history
  • Loading branch information
keller-mark committed Sep 24, 2023
1 parent 9be60dd commit a8511e6
Show file tree
Hide file tree
Showing 8 changed files with 400 additions and 406 deletions.
6 changes: 0 additions & 6 deletions pkgdown/_pkgdown.yml
Original file line number Diff line number Diff line change
Expand Up @@ -53,13 +53,7 @@ reference:
- giotto_to_anndata_zarr

articles:
- title: Articles
navbar: Developer guides
contents:
- dev_wrapper_class
- dev_wrapper_subclass
- title: Articles
navbar: Troubleshooting
contents:
- debugging
- session_info
70 changes: 35 additions & 35 deletions vignettes/giotto.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -121,41 +121,41 @@ SS_seqfish <- runtSNE(SS_seqfish, dimensions_to_use = 1:15)
Set up the Vitessce widget:

```r
library(vitessceR)

w <- GiottoWrapper$new(
SS_seqfish,
cell_set_metas = c("cell_types"),
cell_set_meta_names = c("Cell Types"),
cell_embeddings = c("pca", "tsne"),
cell_embedding_names = c("PCA", "t-SNE"),
out_dir = file.path("data", "giotto")
)

vc <- VitessceConfig$new("My config")
dataset <- vc$add_dataset("My dataset")$add_object(w)
spatial <- vc$add_view(dataset, Component$SPATIAL)
scatterplot_tsne <- vc$add_view(dataset, Component$SCATTERPLOT, mapping = "t-SNE")
cell_sets <- vc$add_view(dataset, Component$CELL_SETS)
status <- vc$add_view(dataset, Component$STATUS)
desc <- vc$add_view(dataset, Component$DESCRIPTION)
desc <- desc$set_props(description = "Visualization of a Giotto object.")

vc$layout(
hconcat(
vconcat(
spatial,
scatterplot_tsne
),
vconcat(
cell_sets,
hconcat(desc, status)
)
)
)

# Render the Vitessce widget
vc$widget(theme = "light")
# library(vitessceR)

# w <- GiottoWrapper$new(
# SS_seqfish,
# cell_set_metas = c("cell_types"),
# cell_set_meta_names = c("Cell Types"),
# cell_embeddings = c("pca", "tsne"),
# cell_embedding_names = c("PCA", "t-SNE"),
# out_dir = file.path("data", "giotto")
# )

# vc <- VitessceConfig$new("My config")
# dataset <- vc$add_dataset("My dataset")$add_object(w)
# spatial <- vc$add_view(dataset, Component$SPATIAL)
# scatterplot_tsne <- vc$add_view(dataset, Component$SCATTERPLOT, mapping = "t-SNE")
# cell_sets <- vc$add_view(dataset, Component$CELL_SETS)
# status <- vc$add_view(dataset, Component$STATUS)
# desc <- vc$add_view(dataset, Component$DESCRIPTION)
# desc <- desc$set_props(description = "Visualization of a Giotto object.")

# vc$layout(
# hconcat(
# vconcat(
# spatial,
# scatterplot_tsne
# ),
# vconcat(
# cell_sets,
# hconcat(desc, status)
# )
# )
# )

# # Render the Vitessce widget
# vc$widget(theme = "light")
```


Expand Down
2 changes: 1 addition & 1 deletion vignettes/session_info.Rmd
Original file line number Diff line number Diff line change
Expand Up @@ -11,6 +11,6 @@ This page runs the `sessionInfo()` function and prints the results.
The output can be used to check the dependency versions that were used to run tests.

```{r include=TRUE, echo=TRUE}
library(vitessceR)
library(vitessceAnalysisR)
sessionInfo()
```
Loading

0 comments on commit a8511e6

Please sign in to comment.