Skip to content

Commit

Permalink
profile_compare() removed from aqp 2.3
Browse files Browse the repository at this point in the history
  • Loading branch information
dylanbeaudette committed Feb 6, 2025
1 parent 45962b6 commit 70a5a91
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 4 deletions.
2 changes: 1 addition & 1 deletion NEWS.md
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
# sharpshootR 2.3.3 (2025-01-28)
# sharpshootR 2.3.3 (2025-02-06)
* update SPC fields from data derived from NASIS (via examples and soilDB data)
* CRAN release

Expand Down
5 changes: 2 additions & 3 deletions tests/testthat/test-plotProfileDendrogram.R
Original file line number Diff line number Diff line change
Expand Up @@ -5,16 +5,15 @@ context("plotProfileDendrogram")
library(aqp, quietly = TRUE)
suppressWarnings(library(cluster, quietly = TRUE))

# example data that will have IDs re-shuffled by profile_compare (https://github.com/ncss-tech/aqp/issues/7)
set.seed(10101)
s <- aqp::combine(lapply(c('Z', LETTERS[1:5]), random_profile, SPC=TRUE))
s <- aqp::combine(lapply(c('Z', LETTERS[1:5]), random_profile, SPC = TRUE))

## tests

test_that("plotProfileDendrogram works as expected", {

# suppressing warnings until we switch to NCSP() and aqp 2.0 is on CRAN
d <- suppressWarnings(profile_compare(s, vars=c('p1','p2'), max_d = 100, k = 0))
d <- suppressWarnings(NCSP(s, vars = c('p1','p2'), maxDepth = 100, k = 0))
dd <- diana(d)

# par(mfrow = c(2,1), mar = c(0,0,0,1))
Expand Down

0 comments on commit 70a5a91

Please sign in to comment.