# 
# Written by:
# -- 
# John L. Weatherwax                2009-04-21
# 
# email: wax@alum.mit.edu
# 
# Please send comments and especially bug reports to the
# above email address.
# 
#-----

x = c(8, 54, 534, 1630, 6611)
seq( 1, length(x) )

x = NULL
seq( 1, length(x) )
seq( along=x )