>>302
# 1回も宿直に当たらない人がいてはいけない。
# 1人で3日すべて宿直に当たるのもあってはならない。

と条件を変更すると

> print(tail(ans,10),quote=F)
月 月 火 火 水 水
[171,] B C A D D E
[172,] B C A E D E
[173,] A B B C D E
[174,] A C B C D E
[175,] A D B C D E
[176,] A E B C D E
[177,] A C B D D E
[178,] A C B E D E
[179,] A B C D D E
[180,] A B C E D E
> print(tail(ans,10),quote=F)
月 月 火 火 水 水
[171,] B C A D D E
[172,] B C A E D E
[173,] A B B C D E
[174,] A C B C D E
[175,] A D B C D E
[176,] A E B C D E
[177,] A C B D D E
[178,] A C B E D E
[179,] A B C D D E
[180,] A B C E D E
>
１８０通り