*Is there an implementation of this in R? Thanks.
*

	[[alternative HTML version deleted]]

