Closed RobinHankin closed 3 months ago
library("hyper2") #> Loading required package: cubature
H <- chess3[c(Anand=1)] print(pnames(H)) #> [1] "Anand" "Karpov" "Kasparov"
H[c(Anand=2,Karpov=3)] <- -15 print(pnames(H)) #> [1] "Anand" "Karpov"
print(H) #> log( (Anand=1)^15 * (Anand=2, Karpov=3)^-15)
Created on 2024-05-21 with reprex v2.1.0
The second print statement shows that Kasparov has disappeared.
Created on 2024-05-21 with reprex v2.1.0
The second print statement shows that Kasparov has disappeared.