You might need to buy an adjustable shock to lower it like wilbers, some also fit a Wunderlich seat....join the forum and the members will be only too glad to offer practical advice.
http://forums.bmwmoa.org/showthread.php?45058-R1100S-General-Information