Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Jump to bottom

update api_segments to handle empty segments #1155

Merged
merged 8 commits into from
Jun 14, 2024
Merged

update api_segments to handle empty segments #1155

Changes from 1 commit
Commits
Show all changes
8 commits
Select commit Hold shift + click to select a range
b134ccd
Merge branch 'cran/1.5.0' of https://github.com/M3nin0/sits into feat…
OldLipe May 9, 2024
48ae8f1
Merge branch 'feat/dev-sits' of https://github.com/oldlipe/sits into …
OldLipe Jun 11, 2024
27268f2
Merge branch 'dev' of https://github.com/e-sensing/sits into feat/dev…
OldLipe Jun 11, 2024
03160ea
fix empty segments classification
M3nin0 Jun 13, 2024
6717fac
Fix segmentation with NA values
OldLipe Jun 14, 2024
d291650
return filling feature in time series
OldLipe Jun 14, 2024
423352c
update empty segments handling
M3nin0 Jun 14, 2024
524e38c
Merge branch 'feat/dev-sits' of https://github.com/OldLipe/sits into dev
M3nin0 Jun 14, 2024
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Jump to
Jump to file
Failed to load files.
Diff view
Diff view
Prev Previous commit
Next Next commit
fix empty segments classification
  • Loading branch information
@M3nin0
M3nin0 committed Jun 13, 2024
commit 03160ea343e19a08c79a81d74ad2b232b062652e
4 changes: 4 additions & 0 deletions R/api_segments.R
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -376,6 +376,9 @@
# retrieve the segments
segments <- .vector_read_vec(chunk[["segments"]][[1]])
# include lat/long information
segments <- segments |> dplyr::filter(
.data[["pol_id"]] %in% unique(ts_bands[["polygon_id"]])
)
lat_long <- .proj_to_latlong(segments[["x"]], segments[["y"]], .crs(tile))
# create metadata for the polygons
samples <- tibble::tibble(
Expand Down Expand Up @@ -477,3 +480,4 @@
})
return(seg_tile_band_lst)
}
#