Skip to content

Commit

Permalink
Merge branch 'dev'
Browse files Browse the repository at this point in the history
  • Loading branch information
Soupir, Alex C committed Sep 30, 2024
2 parents 5f1739e + e9a4965 commit a98590c
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 8 deletions.
4 changes: 2 additions & 2 deletions DESCRIPTION
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
Package: scSpatialSIM
Title: A Point Pattern Simulator for Spatial Cellular Data
Version: 0.1.3.3
Version: 0.1.3.4
Authors@R:
c(
person(given = "Alex",
Expand Down Expand Up @@ -30,7 +30,7 @@ Authors@R:
comment = c(ORCID = "")),
person(given = "Brooke",
family = "Fridley",
email = "brooke.fridley.moffitt.org",
email = "[email protected]",
role = c("aut", "cph"),
comment = c(ORCID = "")),
person(given = "Fridley",
Expand Down
8 changes: 2 additions & 6 deletions R/creating_spatial_processes.R
Original file line number Diff line number Diff line change
Expand Up @@ -62,12 +62,8 @@ GenerateSpatialPattern = function(sim_object, lambda = 25, ..., overwrite = FALS

#make the list of spatial dataframes like spatstat
spatial_dfs = lapply(seq(sims), function(hld){
sp_df = list(window = window,
n = nrow(new_raw_df),
x = new_raw_df$x + min(window$xrange),
y = new_raw_df$y + min(window$yrange),
markformat = 'none')
class(sp_df) = 'ppp'
sp_df = data.frame(x = new_raw_df$x + min(window$xrange),
y = new_raw_df$y + min(window$yrange))
return(sp_df)
})
} else {
Expand Down

0 comments on commit a98590c

Please sign in to comment.