Nothing
#' ImageNet Class Labels
#'
#' Utilities for resolving ImageNet-1k class identifiers to their corresponding
#' human readable labels. The labels are retrieved from the same source used by
#' PyTorch's reference implementation.
#'
#' @return A character vector with 1000 entries representing the ImageNet-1k
#' class labels.
#' @export
imagenet_classes <- function() {
url <- "https://raw.githubusercontent.com/pytorch/hub/master/imagenet_classes.txt"
labels <- readLines(url, warn = FALSE)
labels[nzchar(labels)]
}
#' @rdname imagenet_classes
#' @param id Integer vector of 1-based class identifiers.
#' @return A character vector with the labels associated with `id`.
#' @export
imagenet_label <- function(id) {
classes <- imagenet_classes()
classes[id]
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.