restart:
d:= 2*x^3+x^2+2*x:
factor(d);
select(x-> degree(x)>1, %);
factor(d, RootOf(%, index= 1));
convert(1/%, parfrac, x);
allvalues(%);