This is a small program that approximately converts global WGS84 coordinates into Swiss national CH1903 coordinates. It is written in R.
The formulas are according to the ones provided by the Swiss Federal Office of Topography.