Given a vector of flip sites, 1s or -1s, representing up and down spins respectively, and an other flip sites, return the transition probability, applying periodic boundary conditions, i.e., cyclic. This function is pure R implementation.

1 | ```
transitionProbability1D_R(ikBT, x, xFlip, J, H)
``` |

`ikBT` |
1/kB*T (Boltzmann factor) |

`x` |
1D Spin sites on the lattice. |

`xFlip` |
1D Spin sites on the lattice: after a flip. |

`J` |
Interaction strength |

`H` |
External field |

Returns transition probability.

Mehmet Suzen <mehmet.suzen@physics.org>

1 2 3 4 5 | ```
n <- 10 # 10 spin sites
mySites <- genConfig1D_R(n) # Generate sites
mySitesNew <- flipConfig1D_R(mySites)
# only short-range part
transitionProbability1D_R(1.0, mySites, mySitesNew, 1.0, 0.0)
``` |

Questions? Problems? Suggestions? Tweet to @rdrrHQ or email at ian@mutexlabs.com.

All documentation is copyright its authors; we didn't write any of that.