# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
proj_version <- function() {
.Call(`_terra_proj_version`)
}
hex2rgb <- function(s) {
.Call(`_terra_hex2rgb`, s)
}
rgb2hex <- function(x) {
.Call(`_terra_rgb2hex`, x)
}
.sameSRS <- function(x, y) {
.Call(`_terra_sameSRS`, x, y)
}
.SRSinfo <- function(s) {
.Call(`_terra_getCRSname`, s)
}
.getLinearUnits <- function(s) {
.Call(`_terra_getLinearUnits`, s)
}
.geotransform <- function(fname) {
.Call(`_terra_geotransform`, fname)
}
.gdal_setconfig <- function(option, value) {
invisible(.Call(`_terra_gdal_setconfig`, option, value))
}
.gdal_getconfig <- function(option) {
.Call(`_terra_gdal_getconfig`, option)
}
.gdalinfo <- function(filename, options, oo) {
.Call(`_terra_ginfo`, filename, options, oo)
}
.sdinfo <- function(filename) {
.Call(`_terra_sd_info`, filename)
}
.gdal_version <- function() {
.Call(`_terra_gdal_version`)
}
.geos_version <- function(runtime = FALSE, capi = FALSE) {
.Call(`_terra_geos_version`, runtime, capi)
}
.metadata <- function(filename) {
.Call(`_terra_metatdata`, filename)
}
.sdsmetadata <- function(filename) {
.Call(`_terra_sdsmetatdata`, filename)
}
.parsedsdsmetadata <- function(filename) {
.Call(`_terra_sdsmetatdataparsed`, filename)
}
.gdaldrivers <- function() {
.Call(`_terra_gdal_drivers`)
}
.set_gdal_warnings <- function(level) {
invisible(.Call(`_terra_set_gdal_warnings`, level))
}
.seedinit <- function(seed_val) {
invisible(.Call(`_terra_seed_init`, seed_val))
}
.gdalinit <- function(projpath, datapath) {
invisible(.Call(`_terra_gdal_init`, projpath, datapath))
}
.precRank <- function(x, y, minc, maxc, tail) {
.Call(`_terra_percRank`, x, y, minc, maxc, tail)
}
.setGDALCacheSizeMB <- function(x) {
invisible(.Call(`_terra_setGDALCacheSizeMB`, x))
}
.getGDALCacheSizeMB <- function() {
.Call(`_terra_getGDALCacheSizeMB`)
}
.get_proj_search_paths <- function() {
.Call(`_terra_get_proj_search_paths`)
}
.set_proj_search_paths <- function(paths) {
.Call(`_terra_set_proj_search_paths`, paths)
}
.PROJ_network <- function(enable, url) {
.Call(`_terra_PROJ_network`, enable, url)
}
.pearson <- function(x, y, narm) {
.Call(`_terra_pearson_cor`, x, y, narm)
}
.weighted_pearson <- function(x, y, weights, narm = TRUE) {
.Call(`_terra_weighted_pearson_cor`, x, y, weights, narm)
}
.unique_symmetric_rows <- function(x, y) {
.Call(`_terra_uniqueSymmetricRows`, x, y)
}
dist_lonlat <- function(lon1, lat1, lon2, lat2) {
.Call(`_terra_dist_lonlat`, lon1, lat1, lon2, lat2)
}
dest_lonlat <- function(slon, slat, sazi, dist, dlon, dlat, dazi) {
invisible(.Call(`_terra_dest_lonlat`, slon, slat, sazi, dist, dlon, dlat, dazi))
}
dir_lonlat <- function(lon1, lat1, lon2, lat2) {
.Call(`_terra_dir_lonlat`, lon1, lat1, lon2, lat2)
}
dist2track <- function(lon1, lat1, lon2, lat2, plon, plat, sign) {
.Call(`_terra_dist2track`, lon1, lat1, lon2, lat2, plon, plat, sign)
}
alongTrackDistance <- function(lon1, lat1, lon2, lat2, plon, plat) {
.Call(`_terra_alongTrackDistance`, lon1, lat1, lon2, lat2, plon, plat)
}
dist2segment <- function(plon, plat, lon1, lat1, lon2, lat2) {
.Call(`_terra_dist2segment`, plon, plat, lon1, lat1, lon2, lat2)
}
dist2segmentPoint <- function(plon, plat, lon1, lat1, lon2, lat2, ilon, ilat) {
.Call(`_terra_dist2segmentPoint`, plon, plat, lon1, lat1, lon2, lat2, ilon, ilat)
}
intermediate <- function(lon1, lat1, lon2, lat2, n, distance) {
.Call(`_terra_intermediate`, lon1, lat1, lon2, lat2, n, distance)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.