R/polly_interfaces.R

Defines functions synthesize_speech_output synthesize_speech_input start_speech_synthesis_task_output start_speech_synthesis_task_input put_lexicon_output put_lexicon_input list_speech_synthesis_tasks_output list_speech_synthesis_tasks_input list_lexicons_output list_lexicons_input get_speech_synthesis_task_output get_speech_synthesis_task_input get_lexicon_output get_lexicon_input describe_voices_output describe_voices_input delete_lexicon_output delete_lexicon_input

# This file is generated by make.paws. Please do not edit here.
#' @importFrom paws.common populate
#' @include polly_service.R
NULL

.polly$delete_lexicon_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Name = structure(logical(0), tags = list(location = "uri", locationName = "LexiconName", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$delete_lexicon_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$describe_voices_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Engine = structure(logical(0), tags = list(location = "querystring", locationName = "Engine", type = "string")), LanguageCode = structure(logical(0), tags = list(location = "querystring", locationName = "LanguageCode", type = "string")), IncludeAdditionalLanguageCodes = structure(logical(0), tags = list(location = "querystring", locationName = "IncludeAdditionalLanguageCodes", type = "boolean")), NextToken = structure(logical(0), tags = list(location = "querystring", locationName = "NextToken", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$describe_voices_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Voices = structure(list(structure(list(Gender = structure(logical(0), tags = list(type = "string")), Id = structure(logical(0), tags = list(type = "string")), LanguageCode = structure(logical(0), tags = list(type = "string")), LanguageName = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), AdditionalLanguageCodes = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), SupportedEngines = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list"))), tags = list(type = "structure"))), tags = list(type = "list")), NextToken = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$get_lexicon_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Name = structure(logical(0), tags = list(location = "uri", locationName = "LexiconName", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$get_lexicon_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Lexicon = structure(list(Content = structure(logical(0), tags = list(type = "string", sensitive = TRUE)), Name = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), LexiconAttributes = structure(list(Alphabet = structure(logical(0), tags = list(type = "string")), LanguageCode = structure(logical(0), tags = list(type = "string")), LastModified = structure(logical(0), tags = list(type = "timestamp")), LexiconArn = structure(logical(0), tags = list(type = "string")), LexemesCount = structure(logical(0), tags = list(type = "integer")), Size = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$get_speech_synthesis_task_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TaskId = structure(logical(0), tags = list(location = "uri", locationName = "TaskId", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$get_speech_synthesis_task_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(SynthesisTask = structure(list(Engine = structure(logical(0), tags = list(type = "string")), TaskId = structure(logical(0), tags = list(type = "string")), TaskStatus = structure(logical(0), tags = list(type = "string")), TaskStatusReason = structure(logical(0), tags = list(type = "string")), OutputUri = structure(logical(0), tags = list(type = "string")), CreationTime = structure(logical(0), tags = list(type = "timestamp")), RequestCharacters = structure(logical(0), tags = list(type = "integer")), SnsTopicArn = structure(logical(0), tags = list(type = "string")), LexiconNames = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), OutputFormat = structure(logical(0), tags = list(type = "string")), SampleRate = structure(logical(0), tags = list(type = "string")), SpeechMarkTypes = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), TextType = structure(logical(0), tags = list(type = "string")), VoiceId = structure(logical(0), tags = list(type = "string")), LanguageCode = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$list_lexicons_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(NextToken = structure(logical(0), tags = list(location = "querystring", locationName = "NextToken", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$list_lexicons_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Lexicons = structure(list(structure(list(Name = structure(logical(0), tags = list(type = "string")), Attributes = structure(list(Alphabet = structure(logical(0), tags = list(type = "string")), LanguageCode = structure(logical(0), tags = list(type = "string")), LastModified = structure(logical(0), tags = list(type = "timestamp")), LexiconArn = structure(logical(0), tags = list(type = "string")), LexemesCount = structure(logical(0), tags = list(type = "integer")), Size = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure"))), tags = list(type = "structure"))), tags = list(type = "list")), NextToken = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$list_speech_synthesis_tasks_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(MaxResults = structure(logical(0), tags = list(location = "querystring", locationName = "MaxResults", type = "integer")), NextToken = structure(logical(0), tags = list(location = "querystring", locationName = "NextToken", type = "string")), Status = structure(logical(0), tags = list(location = "querystring", locationName = "Status", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$list_speech_synthesis_tasks_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(NextToken = structure(logical(0), tags = list(type = "string")), SynthesisTasks = structure(list(structure(list(Engine = structure(logical(0), tags = list(type = "string")), TaskId = structure(logical(0), tags = list(type = "string")), TaskStatus = structure(logical(0), tags = list(type = "string")), TaskStatusReason = structure(logical(0), tags = list(type = "string")), OutputUri = structure(logical(0), tags = list(type = "string")), CreationTime = structure(logical(0), tags = list(type = "timestamp")), RequestCharacters = structure(logical(0), tags = list(type = "integer")), SnsTopicArn = structure(logical(0), tags = list(type = "string")), LexiconNames = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), OutputFormat = structure(logical(0), tags = list(type = "string")), SampleRate = structure(logical(0), tags = list(type = "string")), SpeechMarkTypes = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), TextType = structure(logical(0), tags = list(type = "string")), VoiceId = structure(logical(0), tags = list(type = "string")), LanguageCode = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$put_lexicon_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Name = structure(logical(0), tags = list(location = "uri", locationName = "LexiconName", type = "string")), Content = structure(logical(0), tags = list(type = "string", sensitive = TRUE))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$put_lexicon_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$start_speech_synthesis_task_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Engine = structure(logical(0), tags = list(type = "string")), LanguageCode = structure(logical(0), tags = list(type = "string")), LexiconNames = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), OutputFormat = structure(logical(0), tags = list(type = "string")), OutputS3BucketName = structure(logical(0), tags = list(type = "string")), OutputS3KeyPrefix = structure(logical(0), tags = list(type = "string")), SampleRate = structure(logical(0), tags = list(type = "string")), SnsTopicArn = structure(logical(0), tags = list(type = "string")), SpeechMarkTypes = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), Text = structure(logical(0), tags = list(type = "string")), TextType = structure(logical(0), tags = list(type = "string")), VoiceId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$start_speech_synthesis_task_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(SynthesisTask = structure(list(Engine = structure(logical(0), tags = list(type = "string")), TaskId = structure(logical(0), tags = list(type = "string")), TaskStatus = structure(logical(0), tags = list(type = "string")), TaskStatusReason = structure(logical(0), tags = list(type = "string")), OutputUri = structure(logical(0), tags = list(type = "string")), CreationTime = structure(logical(0), tags = list(type = "timestamp")), RequestCharacters = structure(logical(0), tags = list(type = "integer")), SnsTopicArn = structure(logical(0), tags = list(type = "string")), LexiconNames = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), OutputFormat = structure(logical(0), tags = list(type = "string")), SampleRate = structure(logical(0), tags = list(type = "string")), SpeechMarkTypes = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), TextType = structure(logical(0), tags = list(type = "string")), VoiceId = structure(logical(0), tags = list(type = "string")), LanguageCode = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$synthesize_speech_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Engine = structure(logical(0), tags = list(type = "string")), LanguageCode = structure(logical(0), tags = list(type = "string")), LexiconNames = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), OutputFormat = structure(logical(0), tags = list(type = "string")), SampleRate = structure(logical(0), tags = list(type = "string")), SpeechMarkTypes = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), Text = structure(logical(0), tags = list(type = "string")), TextType = structure(logical(0), tags = list(type = "string")), VoiceId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.polly$synthesize_speech_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(AudioStream = structure(logical(0), tags = list(type = "blob", streaming = TRUE)), ContentType = structure(logical(0), tags = list(location = "header", locationName = "Content-Type", type = "string")), RequestCharacters = structure(logical(0), tags = list(location = "header", locationName = "x-amzn-RequestCharacters", type = "integer"))), tags = list(type = "structure", payload = "AudioStream"))
  return(populate(args, shape))
}

Try the paws.machine.learning package in your browser

Any scripts or data that you put into this service are public.

paws.machine.learning documentation built on Sept. 12, 2023, 1:14 a.m.