3x ≡ 7(mod2)
2x ≡ 5(mod3)
5x ≡ 4(mod7)
我在 R 中解决了这个一致性，如下所示
> modlin(3,7,2)
[1] 1
> modlin(2,5,3)
[1] 1
> modlin(5,4,7)
[1] 5
> a<-c(1,1,5)
> m<-c(2,3,7)
> chinese(a,m)
[1] 19
> prod(2,3,7)
[1] 42
所以，我得到了正确的答案 x=19(mod 42)
在这种情况下，GCD(2,3,7)=1，假设 ax≡b(mod p)，cx≡d(mod q)，gx≡h(mod s) 与 GCD(p,q,s) 不等于 1 那么我知道如何使用中国剩余定理的扩展手动求解这个方程，但我不知道在 R 中。请告诉我在 R 中求解？？