# Expand a polynomial

# Challenge

Given the roots of a polynomial (that is, the $x$ values where the polynomial evaluates to zero), as an array of real numbers, return the polynomial's coefficients.

That is, given real roots $r_1, r_2, \cdots , r_n$, find the coefficients of the expansion of $(x-r_1)(x-r_2)\cdots(x-r_n)$, or any non-zero scalar multiple of it.

You may use either lowest power first or highest power first order for the resulting list of coefficients.

## Tests

```
// Note that any non-zero scalar multiple of these results is valid
[] -> [1]
[1] -> [-1, 1] // (x - 1) = -1 + 1x
[1, 2] -> [2, -3, 1] // (x - 1)(x - 2) = 2 - 3x + 1x^2
[1, 1] -> [1, -2, 1] // (x - 1)^2 = 1 -2x + 1x^2
[1, 2, 3] -> [-6, 11, -6, 1] // (x - 1)(x - 2)(x - 3) = -6 + 11x - 6x^2 + x^3
```

This is code golf, so the shortest answer in bytes wins!

Japt `-Q`, 15 12 bytes …

3y ago

Vyxal, 2 bytes ``` ∆ṙ ``` …

3y ago

[JavaScript (Node.js)], 60 byt …

10d ago

[Haskell], 45 bytes …

3y ago

## 4 answers

# JavaScript (Node.js), 60 bytes

```
f=([x,...r],y)=>x?[0,...y=f(r)].map((v,i)=>v-x*(y[i]|0)):[1]
```

#### 1 comment thread

# Haskell, 45 bytes

```
foldl(\a b->zipWith((-).(*b))(0:a)$a++[0])[1]
```

Uses the "highest power first" convention. Sometimes multiplies the polynomial by $(-1)$.

## 0 comment threads