| sgd {sgd} | R Documentation |
Stochastic gradient descent
Description
Run stochastic gradient descent in order to optimize the induced loss function given a model and data.
Usage
sgd(x, ...)
## S3 method for class 'formula'
sgd(formula, data, model, model.control = list(), sgd.control = list(...), ...)
## S3 method for class 'matrix'
sgd(x, y, model, model.control = list(), sgd.control = list(...), ...)
## S3 method for class 'big.matrix'
sgd(x, y, model, model.control = list(), sgd.control = list(...), ...)
Arguments
x, y |
a design matrix and the respective vector of outcomes. |
... |
arguments to be used to form the default |
formula |
an object of class |
data |
an optional data frame, list or environment (or object coercible
by |
model |
character specifying the model to be used: |
model.control |
a list of parameters for controlling the model.
|
sgd.control |
an optional list of parameters for controlling the estimation.
|
Details
Models: The Cox model assumes that the survival data is ordered when passed in, i.e., such that the risk set of an observation i is all data points after it.
Methods:
sgdstochastic gradient descent (Robbins and Monro, 1951)
implicitimplicit stochastic gradient descent (Toulis et al., 2014)
asgdstochastic gradient with averaging (Polyak and Juditsky, 1992)
ai-sgdimplicit stochastic gradient with averaging (Toulis et al., 2015)
momentum"classical" momentum (Polyak, 1964)
nesterovNesterov's accelerated gradient (Nesterov, 1983)
Learning rates and hyperparameters:
one-dimscalar value prescribed in Xu (2011) as
a_n = scale * gamma/(1 + alpha*gamma*n)^(-c)where the defaults are
lr.control = (scale=1, gamma=1, alpha=1, c)wherecis1if implemented without averaging,2/3if with averagingone-dim-eigendiagonal matrix
lr.control = NULLd-dimdiagonal matrix
lr.control = (epsilon=1e-6)adagraddiagonal matrix prescribed in Duchi et al. (2011) as
lr.control = (eta=1, epsilon=1e-6)rmspropdiagonal matrix prescribed in Tieleman and Hinton (2012) as
lr.control = (eta=1, gamma=0.9, epsilon=1e-6)
Value
An object of class "sgd", which is a list containing the following
components:
model |
name of the model |
coefficients |
a named vector of coefficients |
converged |
logical. Was the algorithm judged to have converged? |
estimates |
estimates from algorithm stored at each iteration
specified in |
fitted.values |
the fitted mean values |
pos |
vector of indices specifying the iteration number each estimate was stored for |
residuals |
the residuals, that is response minus fitted values |
times |
vector of times in seconds it took to complete the number of
iterations specified in |
model.out |
a list of model-specific output attributes |
Author(s)
Dustin Tran, Tian Lan, Panos Toulis, Ye Kuang, Edoardo Airoldi
References
John Duchi, Elad Hazan, and Yoram Singer. Adaptive subgradient methods for online learning and stochastic optimization. Journal of Machine Learning Research, 12:2121-2159, 2011.
Yurii Nesterov. A method for solving a convex programming problem with
convergence rate O(1/k^2). Soviet Mathematics Doklady,
27(2):372-376, 1983.
Boris T. Polyak. Some methods of speeding up the convergence of iteration methods. USSR Computational Mathematics and Mathematical Physics, 4(5):1-17, 1964.
Boris T. Polyak and Anatoli B. Juditsky. Acceleration of stochastic approximation by averaging. SIAM Journal on Control and Optimization, 30(4):838-855, 1992.
Herbert Robbins and Sutton Monro. A stochastic approximation method. The Annals of Mathematical Statistics, pp. 400-407, 1951.
Panos Toulis, Jason Rennie, and Edoardo M. Airoldi, "Statistical analysis of stochastic gradient methods for generalized linear models", In Proceedings of the 31st International Conference on Machine Learning, 2014.
Panos Toulis, Dustin Tran, and Edoardo M. Airoldi, "Stability and optimality in stochastic gradient descent", arXiv preprint arXiv:1505.02417, 2015.
Wei Xu. Towards optimal one pass large scale learning with averaged stochastic gradient descent. arXiv preprint arXiv:1107.2490, 2011.
# Dimensions
Examples
## Linear regression
set.seed(42)
N <- 1e4
d <- 5
X <- matrix(rnorm(N*d), ncol=d)
theta <- rep(5, d+1)
eps <- rnorm(N)
y <- cbind(1, X) %*% theta + eps
dat <- data.frame(y=y, x=X)
sgd.theta <- sgd(y ~ ., data=dat, model="lm")
sprintf("Mean squared error: %0.3f", mean((theta - as.numeric(sgd.theta$coefficients))^2))