View source: R/ms_synthesize.R
ms_synthesize | R Documentation |
Get Microsoft Text To Speech (TTS) or Cognitive Services Token from API Key
ms_synthesize( script, token = NULL, api_key = NULL, gender = c("Female", "Male"), language = "en-US", voice = NULL, output_format = c("raw-16khz-16bit-mono-pcm", "raw-8khz-8bit-mono-mulaw", "riff-8khz-8bit-mono-alaw", "riff-8khz-8bit-mono-mulaw", "riff-16khz-16bit-mono-pcm", "audio-16khz-128kbitrate-mono-mp3", "audio-16khz-64kbitrate-mono-mp3", "audio-16khz-32kbitrate-mono-mp3", "raw-24khz-16bit-mono-pcm", "riff-24khz-16bit-mono-pcm", "audio-24khz-160kbitrate-mono-mp3", "audio-24khz-96kbitrate-mono-mp3", "audio-24khz-48kbitrate-mono-mp3"), escape = FALSE, region = NULL, api = c("tts", "bing"), ... ) ms_region(region = ms_regions()) ms_regions() ms_set_region(region = ms_regions()) ms_synthesize_api_url(api = c("tts", "bing"), region = NULL)
script |
A character vector of lines to be spoken |
token |
An authentication token, base-64 encoded usually from
|
api_key |
Microsoft Cognitive Services API key, if token is not provided. |
gender |
Sex of the Speaker |
language |
Language to be spoken,
must be from |
voice |
full voice name, usually from
|
output_format |
Format of the output, see https://docs.microsoft.com/en-us/azure/cognitive-services/speech-service/how-to-migrate-from-bing-speech for more information |
escape |
Should non-standard characters be substituted? Should not
be used if |
region |
Subscription region for your key. See https://docs.microsoft.com/en-us/azure/cognitive-services/speech-service/overview#reference-docs |
api |
which API to authorize on, either
|
... |
Additional arguments to send to |
A list of the request, content, token, and 'SSML'.
The content is likely in a binary format and the output depends on the 'output_format' chosen. For example, if the 'output_format' is an 'MP3', then see below example
## Not run: if (ms_have_tts_key()) { res = ms_synthesize( script = "hey, how are you doing? I'm doing pretty good", output_format = "audio-16khz-128kbitrate-mono-mp3") tmp <- tempfile(fileext = ".mp3") writeBin(res$content, con = tmp) mp3 = tuneR::readMP3(tmp) } ## End(Not run) ms_regions()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.