gen2holes: Generate Two Intertwined Holes

Description Usage Arguments Value Examples

View source: R/data_gen2holes.R

Description

It generates data from two intertwine circles with empty interiors(holes).

Usage

1
gen2holes(n = 496, sd = 0)

Arguments

n

the total number of observations to be generated.

sd

level of additive white noise.

Value

a list containing

data

an (n\times 2) data matrix for row-stacked observations.

label

a length-n vector for class label.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
## Generate Data with Different Noise Levels
nn = 200
x1 = gen2holes(n=nn, sd=0)
x2 = gen2holes(n=nn, sd=0.1)
x3 = gen2holes(n=nn, sd=0.25)

## Visualize
opar <- par(no.readonly=TRUE)
par(mfrow=c(1,3), pty="s")
plot(x1$data, pch=19, main="sd=0.00", col=x1$label)
plot(x2$data, pch=19, main="sd=0.10", col=x2$label)
plot(x3$data, pch=19, main="sd=0.25", col=x3$label)
par(opar)

kyoustat/TDAkit documentation built on Sept. 1, 2021, 7:22 a.m.