# NOT RUN {
UnitSphere( n=2, k=2, method="edgewise", positive.only=TRUE )
UnitSphere( n=2, k=2, method="edgewise" )
UnitSphere( n=3, k=2, method="edgewise", positive.only=TRUE )
UnitSphere( n=3, k=2, method="edgewise" )
UnitBall( n=2, k=2, method="edgewise", positive.only=TRUE )
UnitBall( n=2, k=2, method="edgewise" )
UnitSphere( n=3, k=2, method="dyadic", positive.only=TRUE )
UnitSphere( n=3, k=2, method="dyadic" )
UnitBall( n=3, k=2, method="dyadic", positive.only=TRUE )
UnitBall( n=3, k=2, method="dyadic" )
UnitSphere( n=3, k=2 )
UnitBall( n=3, k=2 )
x <- c(3,-1,2)
LpNorm( x, p=2 )
# }
# NOT RUN {
plot( UnitSphere( n=3, k=2 ), show.label=TRUE )
plot( UnitBall( n=3, k=2 ) )
# }
Run the code above in your browser using DataLab