$n=<>;
$a[1]=1;
push@a,$_*(${$_%2?odd:even}+=$a[$_-1])%(1e9+7)for 2..$n;
print$a[$n]