Розкладання квадратного тричлена

Ймовірнісні головоломки в R

Peter Chi

Assistant Professor of Statistics<br> Villanova University

Яка ймовірність, що тричлен розкладеться?

Ймовірнісні головоломки в R

Розкладання тричлена

$$ x^2 + 3x + 2$$

  • $a=1$
  • $b=3$
  • $c=2$

$$ x^2 + 3x + 2 = (x+2)(x+1)$$

Ймовірнісні головоломки в R

Квадратна формула

Квадратне рівняння: $ ax^2 + bx + c = 0 $

 

Квадратна формула: $ x = \frac{-b \pm \sqrt{b^2 - 4ac}}{2a} $

Дискримінант: $ b^2 - 4ac $

Ймовірнісні головоломки в R

Використання дискримінанта

Квадратна формула: $ x = \frac{-b \pm \sqrt{b^2 - 4ac}}{2a} $

Дискримінант: $ b^2 - 4ac $

 

Приклад. $x^2 + 3x + 2$

if(3^2 - 4*1*2 < 0){
  return(FALSE)
}
Ймовірнісні головоломки в R

Чи це повний квадрат?

Квадратна формула: $ x = \frac{-b \pm \sqrt{b^2 - 4ac}}{2a} $

Дискримінант: $ b^2 - 4ac $

Приклад. $x^2 + 3x + 2$

sqrt_dscr <- sqrt(3^2 - 4*1*2)
sqrt_dscr == round(sqrt_dscr)
TRUE

 

 

 

is.integer не підходить:

is.integer(sqrt_dscr)
FALSE
Ймовірнісні головоломки в R

Гілка else

Квадратний корінь не обчиснюється:

value <- (-1)
if(value < 0){
  print("The value is negative.")
} else {
  print(sqrt(value))
}
"The value is negative."

Значення додатне, тож обчиснюємо квадратний корінь:

value <- 4
if(value < 0){
  print("The value is negative.")
} else {
  print(sqrt(value))
}
2
Ймовірнісні головоломки в R

Вкладені цикли for

for(i in 1:10){
  for(j in 1:10){
    print(i+j)
  }
}
2
3
4
5
6
7
8
9
10
11
3
4
5
...
Ймовірнісні головоломки в R

Розкладемо кілька тричленів

Ймовірнісні головоломки в R

Preparing Video For Download...