Основы программирования на R

# домашка (определить вероятность попадания "семечек" в расположенный по центру круг с радиусом 0.25,

# когда они падают равновероятно в единичный квадрат):

n <- 100

m <- 0

for (i in 1:n) {

x <- runif(1) # случайные координаты семечки

y <- runif(1)

if (...) {

m <- m + 1 # счетчик попадания в семечку

}

}

m/n # оценка вероятности, полученная методом Монте-Карло

# выразить число pi, используя теоретическую оценку вероятности

# какое число экспериментов (n=?) требуется для того, чтобы численно получить pi с точностью до 5го знака после запятой?