From 272568d41c8265203257b49bdbf7b4c6b1069f2a Mon Sep 17 00:00:00 2001 From: Dylan Beaudette Date: Fri, 24 Jan 2020 13:55:32 -0800 Subject: [PATCH] little bit of feedback --- R/fetchSDA_spatial.R | 3 +++ 1 file changed, 3 insertions(+) diff --git a/R/fetchSDA_spatial.R b/R/fetchSDA_spatial.R index f4a92861..7ee94a6f 100644 --- a/R/fetchSDA_spatial.R +++ b/R/fetchSDA_spatial.R @@ -67,6 +67,9 @@ fetchSDA_spatial <- function(x, by.col = "mukey", method='feature', point='mupolygongeo.STPointOnSurface().STAsText()' ) + # feedback: + message(sprintf("working with %s chunks...", length(unique(mukey.chunk)))) + for(i in 1:length(mukey.chunk)) { idx <- which(mukey.chunk == mukey.chunk[i])