Added function as_header to oauth1.0_token

Same default as before, but is param as_header = FALSE is added then it
adds as parameter to url.
Added demo for withings

A small demo on how to use as_header to access withings API.