• pin_versions() lists available versions a pin.

  • pin_versions_prune() deletes old versions.

  • pin_version_delete() deletes a single version.

pin_versions(board, name, ..., full = deprecated())

pin_version_delete(board, name, version, ...)

pin_versions_prune(board, name, n = NULL, days = NULL, ...)

Arguments

board, name

A pair of board and pin name. For modern boards, use board %>% pin_versions(name). For backward compatibility with the legacy API, you can also use pin_versions(name) or pin_version(name, board).

...

Additional arguments passed on to methods for a specific board.

full

Deprecated lifecycle

version

Version identifier.

n, days

Pick one of n or days to choose how many versions to keep. n = 3 will keep the last three versions, days = 14 will keep all the versions in the 14 days. Regardless of what values you set, pin_versions_prune() will never delete the most recent version.

Value

A data frame with at least a version column. Some boards may provided additional data.

Examples

board <- board_temp(versioned = TRUE)

board %>% pin_write(data.frame(x = 1:5), name = "df")
#> Guessing `type = 'rds'`
#> Creating new version '20211004T114932Z-5b8ae'
#> Writing to pin 'df'
board %>% pin_write(data.frame(x = 2:6), name = "df")
#> Guessing `type = 'rds'`
#> Creating new version '20211004T114932Z-40caf'
#> Writing to pin 'df'
board %>% pin_write(data.frame(x = 3:7), name = "df")
#> Guessing `type = 'rds'`
#> Creating new version '20211004T114932Z-5c9d4'
#> Writing to pin 'df'

# pin_read() returns the latest version by default
board %>% pin_read("df")
#>   x
#> 1 3
#> 2 4
#> 3 5
#> 4 6
#> 5 7

# but you can return earlier versions if needed
board %>% pin_versions("df")
#> # A tibble: 3 × 3
#>   version                created             hash 
#>   <chr>                  <dttm>              <chr>
#> 1 20211004T114932Z-40caf 2021-10-04 11:49:00 40caf
#> 2 20211004T114932Z-5b8ae 2021-10-04 11:49:00 5b8ae
#> 3 20211004T114932Z-5c9d4 2021-10-04 11:49:00 5c9d4

ver <- pin_versions(board, "df")$version[[1]]
board %>% pin_read("df", version = ver)
#>   x
#> 1 2
#> 2 3
#> 3 4
#> 4 5
#> 5 6

# delete all versions created more than 30 days ago
board %>% pin_versions_prune("df", days = 30)
#> No old versions to delete