R package for thermodynamic equation of seawater