% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/classify-smartsolos.R
\name{compare_smartsolos}
\alias{compare_smartsolos}
\title{Cross-validate the local SiBCS classifier against the SmartSolosExpert API}
\usage{
compare_smartsolos(pedon, ...)
}
\arguments{
\item{pedon}{A \code{\link{PedonRecord}}.}

\item{...}{Forwarded to \code{\link{classify_via_smartsolos_api}}.}
}
\value{
A list with \code{local} and \code{remote}
        \code{ClassificationResult}s plus a one-row
        \code{agreement} data.frame with columns
        \code{ordem, subordem, gde_grupo, subgrupo, n_match}.
}
\description{
Runs both \code{\link{classify_sibcs}} (local) and
\code{\link{classify_via_smartsolos_api}} (remote PROLOG via
Embrapa AgroAPI) on the same \code{\link{PedonRecord}} and tabulates
agreement at each of the four SiBCS categorical levels.
}
\examples{
\donttest{
if (nzchar(Sys.getenv("AGROAPI_TOKEN")) &&
      requireNamespace("httr", quietly = TRUE)) {
  cmp <- try(compare_smartsolos(make_argissolo_canonical()),
             silent = TRUE)
  if (!inherits(cmp, "try-error")) cmp$agreement
}
}
}
