Solving nonnegative linear system in R

Is it possible to find a solution to the undetermined system Ax = b, x >= 0 using some native R function? I can certainly write a linear program and use开发者_如何学C lpsolve, but am hoping for something native.

Actually, I found what I was looking for. The package nnls addresses exactly my problem.