Merge pull request satijalab#588 from satijalab/feat/image_alpha

propogate image.alpha to convenience fxns

DESCRIPTION

@@ -1,5 +1,5 @@
 Package: Seurat
-Version: 4.0.3.9012
+Version: 4.0.3.9013
 Date: 2021-07-30
 Title: Tools for Single Cell Genomics
 Description: A toolkit for quality control, analysis, and exploration of single cell RNA sequencing data. 'Seurat' aims to enable users to identify and interpret sources of heterogeneity from single cell transcriptomic measurements, and to integrate diverse types of single cell data. See Satija R, Farrell J, Gennert D, et al (2015) <doi:10.1038/nbt.3192>, Macosko E, Basu A, Satija R, et al (2015) <doi:10.1016/j.cell.2015.05.002>, Stuart T, Butler A, et al (2019) <doi:10.1016/j.cell.2019.05.031>, and Hao, Hao, et al (2020) <doi:10.1101/2020.10.12.335331> for more details.

NEWS.md

@@ -6,6 +6,7 @@
 - Add `ReadSTARsolo()` function to read output from STARsolo
 - Add `densify` parameter to `FindMarkers()`
 - Add `ReadParsebio()` function to read output from Parse Biosciences
+- Add the `image.alpha` parameter to `SpatialDimPlot()` and `SpatialFeaturePlot()`
 
 ## Changes
 - Warn and continue rather than erroring if not all features are available in `FindSpatiallyVariableFeatures()` ([#4611](https://github.com/satijalab/seurat/issues/4611))

R/convenience.R

@@ -52,6 +52,7 @@ SpatialDimPlot <- function(
   combine = TRUE,
   pt.size.factor = 1.6,
   alpha = c(1, 1),
+  image.alpha = 1,
   stroke = 0.25,
   label.box = TRUE,
   interactive = FALSE,
@@ -74,6 +75,7 @@ SpatialDimPlot <- function(
     combine = combine,
     pt.size.factor = pt.size.factor,
     alpha = alpha,
+    image.alpha = image.alpha,
     stroke = stroke,
     label.box = label.box,
     interactive = interactive,
@@ -98,6 +100,7 @@ SpatialFeaturePlot <- function(
   combine = TRUE,
   pt.size.factor = 1.6,
   alpha = c(1, 1),
+  image.alpha = 1,
   stroke = 0.25,
   interactive = FALSE,
   information = NULL
@@ -114,6 +117,7 @@ SpatialFeaturePlot <- function(
     combine = combine,
     pt.size.factor = pt.size.factor,
     alpha = alpha,
+    image.alpha = image.alpha,
     stroke = stroke,
     interactive = interactive,
     information = information