diff --git a/modules/openapi-generator/src/main/resources/r/api_doc.mustache b/modules/openapi-generator/src/main/resources/r/api_doc.mustache
index 632dadf874c33b9c74b88d716c9f34483daea148..f75f21193ecd4c3f7053b40de0cd9a99de95be61 100644
--- a/modules/openapi-generator/src/main/resources/r/api_doc.mustache
+++ b/modules/openapi-generator/src/main/resources/r/api_doc.mustache
@@ -21,13 +21,17 @@ Method | HTTP request | Description
 ```R
 library({{{packageName}}})
 
+{{#summary}}
+# {{{.}}}
+#
+{{/summary}}
 {{#allParams}}
+{{#-first}}
+# prepare function argument(s)
+{{/-first}}
 var_{{{paramName}}} <- {{{vendorExtensions.x-r-example}}} # {{{dataType}}} | {{{description}}}{{^required}} (Optional){{/required}}
 {{/allParams}}
 
-{{#summary}}
-# {{{.}}}
-{{/summary}}
 {{#generateWrapper}}
 api_instance <- {{#lambda.lowercase}}{{{packageName}}}{{/lambda.lowercase}}_api$new()
 {{/generateWrapper}}
@@ -39,21 +43,21 @@ api_instance <- {{{classname}}}$new()
 {{#isBasic}}
 {{#isBasicBasic}}
 # Configure HTTP basic authorization: {{{name}}}
-api_instance$api_client$username <- Sys.getenv("USERNAME")
-api_instance$api_client$password <- Sys.getenv("PASSWORD")
+{{^-first}}# {{/-first}}api_instance$api_client$username <- Sys.getenv("USERNAME")
+{{^-first}}# {{/-first}}api_instance$api_client$password <- Sys.getenv("PASSWORD")
 {{/isBasicBasic}}
 {{#isBasicBearer}}
 # Configure HTTP bearer authorization: {{{name}}}
-api_instance$api_client$bearer_token <- Sys.getenv("BEARER_TOKEN")
+{{^-first}}# {{/-first}}api_instance$api_client$bearer_token <- Sys.getenv("BEARER_TOKEN")
 {{/isBasicBearer}}
 {{/isBasic}}
 {{#isApiKey}}
 # Configure API key authorization: {{{name}}}
-api_instance$api_client$api_keys["{{{keyParamName}}}"] <- Sys.getenv("API_KEY")
+{{^-first}}# {{/-first}}api_instance$api_client$api_keys["{{{keyParamName}}}"] <- Sys.getenv("API_KEY")
 {{/isApiKey}}
 {{#isOAuth}}
 # Configure OAuth2 access token for authorization: {{{name}}}
-api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
+{{^-first}}# {{/-first}}api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
 {{/isOAuth}}
 {{/authMethods}}
 {{/hasAuthMethods}}
diff --git a/modules/openapi-generator/src/main/resources/r/model_doc.mustache b/modules/openapi-generator/src/main/resources/r/model_doc.mustache
index c6ba5702e7112b9c0ef785b642751cfced30527a..c0c8f5b7dfc08d97f52028b421ec84f9c52a08b4 100644
--- a/modules/openapi-generator/src/main/resources/r/model_doc.mustache
+++ b/modules/openapi-generator/src/main/resources/r/model_doc.mustache
@@ -6,7 +6,7 @@
 ## Properties
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
-{{#vars}}**{{name}}** | {{#isPrimitiveType}}**{{dataType}}**{{/isPrimitiveType}}{{^isPrimitiveType}}[**{{dataType}}**]({{complexType}}.md){{/isPrimitiveType}} | {{description}} | {{^required}}[optional] {{/required}}{{#isReadOnly}}[readonly] {{/isReadOnly}}{{#defaultValue}}[default to {{.}}]{{/defaultValue}}
+{{#vars}}**{{name}}** | {{#isPrimitiveType}}**{{dataType}}**{{/isPrimitiveType}}{{^isPrimitiveType}}[**{{dataType}}**]({{complexType}}.md){{/isPrimitiveType}} | {{description}} | {{^required}}[optional] {{/required}}{{#isReadOnly}}[readonly] {{/isReadOnly}}{{#defaultValue}}[default to {{.}}] {{/defaultValue}}{{#maximum}}[Max: {{{.}}}] {{/maximum}}{{#minimum}}[Min: {{{.}}}] {{/minimum}}{{#isEnum}}[Enum: {{_enum}}] {{/isEnum}}{{#pattern}}[Pattern: {{.}}] {{/pattern}}{{#maxItems}}[Max. items: {{.}}] {{/maxItems}}{{#minItems}}[Min. items: {{.}}] {{/minItems}}{{#maxLength}}[Max. length: {{.}}] {{/maxLength}}{{#minLength}}[Min. length: {{.}}] {{/minLength}}
 {{/vars}}
 
 {{/model}}{{/models}}
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/Animal.md b/samples/client/petstore/R-httr2-wrapper/docs/Animal.md
index 5cb0eb8bbf27b83fb5480f2f8f7a0c79b37db836..21af972e0f0dbe2b9d886aab3df98b5b1b235d70 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/Animal.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/Animal.md
@@ -5,6 +5,6 @@
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **className** | **character** |  | 
-**color** | **character** |  | [optional] [default to &quot;red&quot;]
+**color** | **character** |  | [optional] [default to &quot;red&quot;] 
 
 
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/Cat.md b/samples/client/petstore/R-httr2-wrapper/docs/Cat.md
index ba23ea86a33efe7849a96082c6e1446725493287..9a717492c09c694a2a081f3757cdef54e22b9386 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/Cat.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/Cat.md
@@ -5,7 +5,7 @@
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **className** | **character** |  | 
-**color** | **character** |  | [optional] [default to &quot;red&quot;]
+**color** | **character** |  | [optional] [default to &quot;red&quot;] 
 **declawed** | **character** |  | [optional] 
 
 
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/Category.md b/samples/client/petstore/R-httr2-wrapper/docs/Category.md
index 7fa99ae82e0f5a6aa2a00be0875875273d8ce6fe..41b20285b80a6003e0a68700d2f92b757830e6cb 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/Category.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/Category.md
@@ -6,6 +6,6 @@ A category for a pet
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **id** | **integer** |  | [optional] 
-**name** | **character** |  | [optional] 
+**name** | **character** |  | [optional] [Pattern: ^[a-zA-Z0-9]+[a-zA-Z0-9\\.\\-_]*[a-zA-Z0-9]+$] 
 
 
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/Dog.md b/samples/client/petstore/R-httr2-wrapper/docs/Dog.md
index b2e732df451b9e92459a7e3a21c6c5a431593098..6893a5e18efcbb393d35bc19e6e9b1cdf8f667b2 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/Dog.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/Dog.md
@@ -5,7 +5,7 @@
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **className** | **character** |  | 
-**color** | **character** |  | [optional] [default to &quot;red&quot;]
+**color** | **character** |  | [optional] [default to &quot;red&quot;] 
 **breed** | **character** |  | [optional] 
 
 
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/FakeApi.md b/samples/client/petstore/R-httr2-wrapper/docs/FakeApi.md
index 4c565e28194c5e456e4fae8e9a9c83eecdd8d596..a5a5cae74c1c8205b421aab7f3056109b4ec1169 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/FakeApi.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/FakeApi.md
@@ -20,10 +20,12 @@ test data_file to ensure it's escaped correctly
 ```R
 library(petstore)
 
+# test data_file to ensure it's escaped correctly
+#
+# prepare function argument(s)
 var_dummy <- "dummy_example" # character | dummy required parameter
 var_var_data_file <- "var_data_file_example" # character | header data file (Optional)
 
-# test data_file to ensure it's escaped correctly
 api_instance <- petstore_api$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -81,9 +83,11 @@ test regular expression to ensure no exception
 ```R
 library(petstore)
 
+# test regular expression to ensure no exception
+#
+# prepare function argument(s)
 var_reg_exp_test <- "reg_exp_test_example" # character | dummy required parameter
 
-# test regular expression to ensure no exception
 api_instance <- petstore_api$new()
 result <- tryCatch(
              api_instance$fake_api$fake_regular_expression(var_reg_exp_test),
@@ -134,10 +138,12 @@ test set query parameter
 ```R
 library(petstore)
 
+# test set query parameter
+#
+# prepare function argument(s)
 var_set_dummy <- list("inner_example") # set[character] | set query
 var_array_dummy <- list("inner_example") # array[character] | array query
 
-# test set query parameter
 api_instance <- petstore_api$new()
 result <- tryCatch(
              api_instance$fake_api$fake_set_query(var_set_dummy, var_array_dummy),
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/Mammal.md b/samples/client/petstore/R-httr2-wrapper/docs/Mammal.md
index d9746cd2df19a63f714511231be93d0296230361..a2835af3f4f7be118ef1f471b8af340398116565 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/Mammal.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/Mammal.md
@@ -7,6 +7,6 @@ Name | Type | Description | Notes
 **hasBaleen** | **character** |  | [optional] 
 **hasTeeth** | **character** |  | [optional] 
 **className** | **character** |  | 
-**type** | **character** |  | [optional] 
+**type** | **character** |  | [optional] [Enum: [plains, mountain, grevys]] 
 
 
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/Order.md b/samples/client/petstore/R-httr2-wrapper/docs/Order.md
index 2e41a351352bb774324219fe1d7e5cb9541d1dac..85860b2fb8969480b560d06d48e7c8409fce11ba 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/Order.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/Order.md
@@ -9,7 +9,7 @@ Name | Type | Description | Notes
 **petId** | **integer** |  | [optional] 
 **quantity** | **integer** |  | [optional] 
 **shipDate** | **character** |  | [optional] 
-**status** | **character** | Order Status | [optional] 
-**complete** | **character** |  | [optional] [default to FALSE]
+**status** | **character** | Order Status | [optional] [Enum: [placed, approved, delivered]] 
+**complete** | **character** |  | [optional] [default to FALSE] 
 
 
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/Pet.md b/samples/client/petstore/R-httr2-wrapper/docs/Pet.md
index 63021a8294ada37d1603f6ba0fb424ee81b8a181..29186b2a14a3d9077ed9d93f4de73d5ec37911bb 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/Pet.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/Pet.md
@@ -10,6 +10,6 @@ Name | Type | Description | Notes
 **name** | **character** |  | 
 **photoUrls** | **array[character]** |  | 
 **tags** | [**array[Tag]**](Tag.md) |  | [optional] 
-**status** | **character** | pet status in the store | [optional] 
+**status** | **character** | pet status in the store | [optional] [Enum: [available, pending, sold]] 
 
 
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/PetApi.md b/samples/client/petstore/R-httr2-wrapper/docs/PetApi.md
index db8aa8d7a6aacd55fb791f6c3620c4d73afa913d..c7cc5d9569648bce9a17d63fff710e72302252c6 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/PetApi.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/PetApi.md
@@ -27,9 +27,11 @@ Add a new pet to the store
 ```R
 library(petstore)
 
+# Add a new pet to the store
+#
+# prepare function argument(s)
 var_pet <- Pet$new("name_example", list("photoUrls_example"), 123, Category$new(123, "name_example"), list(Tag$new(123, "name_example")), "available") # Pet | Pet object that needs to be added to the store
 
-# Add a new pet to the store
 api_instance <- petstore_api$new()
 # Configure HTTP basic authorization: http_auth
 api_instance$api_client$username <- Sys.getenv("USERNAME")
@@ -90,10 +92,12 @@ Deletes a pet
 ```R
 library(petstore)
 
+# Deletes a pet
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | Pet id to delete
 var_api_key <- "api_key_example" # character |  (Optional)
 
-# Deletes a pet
 api_instance <- petstore_api$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
@@ -147,9 +151,11 @@ Multiple status values can be provided with comma separated strings
 ```R
 library(petstore)
 
+# Finds Pets by status
+#
+# prepare function argument(s)
 var_status <- list("available") # array[character] | Status values that need to be considered for filter
 
-# Finds Pets by status
 api_instance <- petstore_api$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
@@ -209,9 +215,11 @@ Multiple tags can be provided with comma separated strings. Use tag1, tag2, tag3
 ```R
 library(petstore)
 
+# Finds Pets by tags
+#
+# prepare function argument(s)
 var_tags <- list("inner_example") # array[character] | Tags to filter by
 
-# Finds Pets by tags
 api_instance <- petstore_api$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -269,9 +277,11 @@ Returns a single pet
 ```R
 library(petstore)
 
+# Find pet by ID
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet to return
 
-# Find pet by ID
 api_instance <- petstore_api$new()
 # Configure HTTP bearer authorization: BearerToken
 api_instance$api_client$bearer_token <- Sys.getenv("BEARER_TOKEN")
@@ -332,9 +342,11 @@ Returns a single pet
 ```R
 library(petstore)
 
+# Find pet by ID (streaming)
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet to return
 
-# Find pet by ID (streaming)
 api_instance <- petstore_api$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -397,9 +409,11 @@ Header test
 ```R
 library(petstore)
 
+# Header test
+#
+# prepare function argument(s)
 var_header_test_int <- 56 # integer | header test int
 
-# Header test
 api_instance <- petstore_api$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -462,9 +476,11 @@ Update an existing pet
 ```R
 library(petstore)
 
+# Update an existing pet
+#
+# prepare function argument(s)
 var_pet <- Pet$new("name_example", list("photoUrls_example"), 123, Category$new(123, "name_example"), list(Tag$new(123, "name_example")), "available") # Pet | Pet object that needs to be added to the store
 
-# Update an existing pet
 api_instance <- petstore_api$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
@@ -526,11 +542,13 @@ Updates a pet in the store with form data
 ```R
 library(petstore)
 
+# Updates a pet in the store with form data
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet that needs to be updated
 var_name <- "name_example" # character | Updated name of the pet (Optional)
 var_status <- "status_example" # character | Updated status of the pet (Optional)
 
-# Updates a pet in the store with form data
 api_instance <- petstore_api$new()
 result <- tryCatch(
              api_instance$pet_api$update_pet_with_form(var_pet_id, name = var_name, status = var_status),
@@ -583,11 +601,13 @@ uploads an image
 ```R
 library(petstore)
 
+# uploads an image
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet to update
 var_additional_metadata <- "additional_metadata_example" # character | Additional data to pass to server (Optional)
 var_file <- File.new('/path/to/file') # data.frame | file to upload (Optional)
 
-# uploads an image
 api_instance <- petstore_api$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/StoreApi.md b/samples/client/petstore/R-httr2-wrapper/docs/StoreApi.md
index 3933cdb256d796b2b08b329dec6fd85f4f408d61..91cfa8e765d0df0fbff5285f74b05b333c37e65e 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/StoreApi.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/StoreApi.md
@@ -21,9 +21,11 @@ For valid response try integer IDs with value < 1000. Anything above 1000 or non
 ```R
 library(petstore)
 
+# Delete purchase order by ID
+#
+# prepare function argument(s)
 var_order_id <- "order_id_example" # character | ID of the order that needs to be deleted
 
-# Delete purchase order by ID
 api_instance <- petstore_api$new()
 result <- tryCatch(
              api_instance$store_api$delete_order(var_order_id),
@@ -75,8 +77,9 @@ Returns a map of status codes to quantities
 ```R
 library(petstore)
 
-
 # Returns pet inventories by status
+#
+
 api_instance <- petstore_api$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -132,9 +135,11 @@ For valid response try integer IDs with value <= 5 or > 10. Other values will ge
 ```R
 library(petstore)
 
+# Find purchase order by ID
+#
+# prepare function argument(s)
 var_order_id <- 56 # integer | ID of pet that needs to be fetched
 
-# Find purchase order by ID
 api_instance <- petstore_api$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -193,9 +198,11 @@ Place an order for a pet
 ```R
 library(petstore)
 
+# Place an order for a pet
+#
+# prepare function argument(s)
 var_order <- Order$new(123, 123, 123, "shipDate_example", "placed", "complete_example") # Order | order placed for purchasing the pet
 
-# Place an order for a pet
 api_instance <- petstore_api$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/UserApi.md b/samples/client/petstore/R-httr2-wrapper/docs/UserApi.md
index da8f0201268c182fca2cfc9105909a72ad80b367..4417f05e9b99244d95c13bbe34a3dbc48da9f94f 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/UserApi.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/UserApi.md
@@ -25,9 +25,11 @@ This can only be done by the logged in user.
 ```R
 library(petstore)
 
+# Create user
+#
+# prepare function argument(s)
 var_user <- User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123) # User | Created user object
 
-# Create user
 api_instance <- petstore_api$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -80,9 +82,11 @@ Creates list of users with given input array
 ```R
 library(petstore)
 
+# Creates list of users with given input array
+#
+# prepare function argument(s)
 var_user <- list(User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123)) # array[User] | List of user object
 
-# Creates list of users with given input array
 api_instance <- petstore_api$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -135,9 +139,11 @@ Creates list of users with given input array
 ```R
 library(petstore)
 
+# Creates list of users with given input array
+#
+# prepare function argument(s)
 var_user <- list(User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123)) # array[User] | List of user object
 
-# Creates list of users with given input array
 api_instance <- petstore_api$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -190,9 +196,11 @@ This can only be done by the logged in user.
 ```R
 library(petstore)
 
+# Delete user
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | The name that needs to be deleted
 
-# Delete user
 api_instance <- petstore_api$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -246,9 +254,11 @@ Get user by user name
 ```R
 library(petstore)
 
+# Get user by user name
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | The name that needs to be fetched. Use user1 for testing.
 
-# Get user by user name
 api_instance <- petstore_api$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -307,10 +317,12 @@ Logs user into the system
 ```R
 library(petstore)
 
+# Logs user into the system
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | The user name for login
 var_password <- "password_example" # character | The password for login in clear text
 
-# Logs user into the system
 api_instance <- petstore_api$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -369,8 +381,9 @@ Logs out current logged in user session
 ```R
 library(petstore)
 
-
 # Logs out current logged in user session
+#
+
 api_instance <- petstore_api$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -420,10 +433,12 @@ This can only be done by the logged in user.
 ```R
 library(petstore)
 
+# Updated user
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | name that need to be deleted
 var_user <- User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123) # User | Updated user object
 
-# Updated user
 api_instance <- petstore_api$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
diff --git a/samples/client/petstore/R-httr2-wrapper/docs/Zebra.md b/samples/client/petstore/R-httr2-wrapper/docs/Zebra.md
index 84e4d20ce941a50eb71bbdf7ad083ddc7ca267bf..51b70941262177592584b2c875b06f0503c8e26e 100644
--- a/samples/client/petstore/R-httr2-wrapper/docs/Zebra.md
+++ b/samples/client/petstore/R-httr2-wrapper/docs/Zebra.md
@@ -4,7 +4,7 @@
 ## Properties
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
-**type** | **character** |  | [optional] 
+**type** | **character** |  | [optional] [Enum: [plains, mountain, grevys]] 
 **className** | **character** |  | 
 
 
diff --git a/samples/client/petstore/R-httr2/docs/Animal.md b/samples/client/petstore/R-httr2/docs/Animal.md
index 5cb0eb8bbf27b83fb5480f2f8f7a0c79b37db836..21af972e0f0dbe2b9d886aab3df98b5b1b235d70 100644
--- a/samples/client/petstore/R-httr2/docs/Animal.md
+++ b/samples/client/petstore/R-httr2/docs/Animal.md
@@ -5,6 +5,6 @@
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **className** | **character** |  | 
-**color** | **character** |  | [optional] [default to &quot;red&quot;]
+**color** | **character** |  | [optional] [default to &quot;red&quot;] 
 
 
diff --git a/samples/client/petstore/R-httr2/docs/Cat.md b/samples/client/petstore/R-httr2/docs/Cat.md
index ba23ea86a33efe7849a96082c6e1446725493287..9a717492c09c694a2a081f3757cdef54e22b9386 100644
--- a/samples/client/petstore/R-httr2/docs/Cat.md
+++ b/samples/client/petstore/R-httr2/docs/Cat.md
@@ -5,7 +5,7 @@
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **className** | **character** |  | 
-**color** | **character** |  | [optional] [default to &quot;red&quot;]
+**color** | **character** |  | [optional] [default to &quot;red&quot;] 
 **declawed** | **character** |  | [optional] 
 
 
diff --git a/samples/client/petstore/R-httr2/docs/Category.md b/samples/client/petstore/R-httr2/docs/Category.md
index 7fa99ae82e0f5a6aa2a00be0875875273d8ce6fe..41b20285b80a6003e0a68700d2f92b757830e6cb 100644
--- a/samples/client/petstore/R-httr2/docs/Category.md
+++ b/samples/client/petstore/R-httr2/docs/Category.md
@@ -6,6 +6,6 @@ A category for a pet
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **id** | **integer** |  | [optional] 
-**name** | **character** |  | [optional] 
+**name** | **character** |  | [optional] [Pattern: ^[a-zA-Z0-9]+[a-zA-Z0-9\\.\\-_]*[a-zA-Z0-9]+$] 
 
 
diff --git a/samples/client/petstore/R-httr2/docs/Dog.md b/samples/client/petstore/R-httr2/docs/Dog.md
index b2e732df451b9e92459a7e3a21c6c5a431593098..6893a5e18efcbb393d35bc19e6e9b1cdf8f667b2 100644
--- a/samples/client/petstore/R-httr2/docs/Dog.md
+++ b/samples/client/petstore/R-httr2/docs/Dog.md
@@ -5,7 +5,7 @@
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **className** | **character** |  | 
-**color** | **character** |  | [optional] [default to &quot;red&quot;]
+**color** | **character** |  | [optional] [default to &quot;red&quot;] 
 **breed** | **character** |  | [optional] 
 
 
diff --git a/samples/client/petstore/R-httr2/docs/FakeApi.md b/samples/client/petstore/R-httr2/docs/FakeApi.md
index e78e99db5b5442ee8173ff5ef3d786e4946e7ec0..9ed020060266e56f69b231a289146f58d5933ca1 100644
--- a/samples/client/petstore/R-httr2/docs/FakeApi.md
+++ b/samples/client/petstore/R-httr2/docs/FakeApi.md
@@ -20,10 +20,12 @@ test data_file to ensure it's escaped correctly
 ```R
 library(petstore)
 
+# test data_file to ensure it's escaped correctly
+#
+# prepare function argument(s)
 var_dummy <- "dummy_example" # character | dummy required parameter
 var_var_data_file <- "var_data_file_example" # character | header data file (Optional)
 
-# test data_file to ensure it's escaped correctly
 api_instance <- FakeApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -81,9 +83,11 @@ test regular expression to ensure no exception
 ```R
 library(petstore)
 
+# test regular expression to ensure no exception
+#
+# prepare function argument(s)
 var_reg_exp_test <- "reg_exp_test_example" # character | dummy required parameter
 
-# test regular expression to ensure no exception
 api_instance <- FakeApi$new()
 result <- tryCatch(
              api_instance$fake_regular_expression(var_reg_exp_test),
@@ -134,10 +138,12 @@ test set query parameter
 ```R
 library(petstore)
 
+# test set query parameter
+#
+# prepare function argument(s)
 var_set_dummy <- list("inner_example") # set[character] | set query
 var_array_dummy <- list("inner_example") # array[character] | array query
 
-# test set query parameter
 api_instance <- FakeApi$new()
 result <- tryCatch(
              api_instance$fake_set_query(var_set_dummy, var_array_dummy),
diff --git a/samples/client/petstore/R-httr2/docs/Mammal.md b/samples/client/petstore/R-httr2/docs/Mammal.md
index d9746cd2df19a63f714511231be93d0296230361..a2835af3f4f7be118ef1f471b8af340398116565 100644
--- a/samples/client/petstore/R-httr2/docs/Mammal.md
+++ b/samples/client/petstore/R-httr2/docs/Mammal.md
@@ -7,6 +7,6 @@ Name | Type | Description | Notes
 **hasBaleen** | **character** |  | [optional] 
 **hasTeeth** | **character** |  | [optional] 
 **className** | **character** |  | 
-**type** | **character** |  | [optional] 
+**type** | **character** |  | [optional] [Enum: [plains, mountain, grevys]] 
 
 
diff --git a/samples/client/petstore/R-httr2/docs/Order.md b/samples/client/petstore/R-httr2/docs/Order.md
index 2e41a351352bb774324219fe1d7e5cb9541d1dac..85860b2fb8969480b560d06d48e7c8409fce11ba 100644
--- a/samples/client/petstore/R-httr2/docs/Order.md
+++ b/samples/client/petstore/R-httr2/docs/Order.md
@@ -9,7 +9,7 @@ Name | Type | Description | Notes
 **petId** | **integer** |  | [optional] 
 **quantity** | **integer** |  | [optional] 
 **shipDate** | **character** |  | [optional] 
-**status** | **character** | Order Status | [optional] 
-**complete** | **character** |  | [optional] [default to FALSE]
+**status** | **character** | Order Status | [optional] [Enum: [placed, approved, delivered]] 
+**complete** | **character** |  | [optional] [default to FALSE] 
 
 
diff --git a/samples/client/petstore/R-httr2/docs/Pet.md b/samples/client/petstore/R-httr2/docs/Pet.md
index 63021a8294ada37d1603f6ba0fb424ee81b8a181..29186b2a14a3d9077ed9d93f4de73d5ec37911bb 100644
--- a/samples/client/petstore/R-httr2/docs/Pet.md
+++ b/samples/client/petstore/R-httr2/docs/Pet.md
@@ -10,6 +10,6 @@ Name | Type | Description | Notes
 **name** | **character** |  | 
 **photoUrls** | **array[character]** |  | 
 **tags** | [**array[Tag]**](Tag.md) |  | [optional] 
-**status** | **character** | pet status in the store | [optional] 
+**status** | **character** | pet status in the store | [optional] [Enum: [available, pending, sold]] 
 
 
diff --git a/samples/client/petstore/R-httr2/docs/PetApi.md b/samples/client/petstore/R-httr2/docs/PetApi.md
index 64b08e54db093bda582d7514474cd7aea1c14704..26936a4b787f09b2e822770196284bc9c72d2892 100644
--- a/samples/client/petstore/R-httr2/docs/PetApi.md
+++ b/samples/client/petstore/R-httr2/docs/PetApi.md
@@ -27,9 +27,11 @@ Add a new pet to the store
 ```R
 library(petstore)
 
+# Add a new pet to the store
+#
+# prepare function argument(s)
 var_pet <- Pet$new("name_example", list("photoUrls_example"), 123, Category$new(123, "name_example"), list(Tag$new(123, "name_example")), "available") # Pet | Pet object that needs to be added to the store
 
-# Add a new pet to the store
 api_instance <- PetApi$new()
 # Configure HTTP basic authorization: http_auth
 api_instance$api_client$username <- Sys.getenv("USERNAME")
@@ -90,10 +92,12 @@ Deletes a pet
 ```R
 library(petstore)
 
+# Deletes a pet
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | Pet id to delete
 var_api_key <- "api_key_example" # character |  (Optional)
 
-# Deletes a pet
 api_instance <- PetApi$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
@@ -147,9 +151,11 @@ Multiple status values can be provided with comma separated strings
 ```R
 library(petstore)
 
+# Finds Pets by status
+#
+# prepare function argument(s)
 var_status <- list("available") # array[character] | Status values that need to be considered for filter
 
-# Finds Pets by status
 api_instance <- PetApi$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
@@ -209,9 +215,11 @@ Multiple tags can be provided with comma separated strings. Use tag1, tag2, tag3
 ```R
 library(petstore)
 
+# Finds Pets by tags
+#
+# prepare function argument(s)
 var_tags <- list("inner_example") # array[character] | Tags to filter by
 
-# Finds Pets by tags
 api_instance <- PetApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -269,9 +277,11 @@ Returns a single pet
 ```R
 library(petstore)
 
+# Find pet by ID
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet to return
 
-# Find pet by ID
 api_instance <- PetApi$new()
 # Configure HTTP bearer authorization: BearerToken
 api_instance$api_client$bearer_token <- Sys.getenv("BEARER_TOKEN")
@@ -332,9 +342,11 @@ Returns a single pet
 ```R
 library(petstore)
 
+# Find pet by ID (streaming)
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet to return
 
-# Find pet by ID (streaming)
 api_instance <- PetApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -397,9 +409,11 @@ Header test
 ```R
 library(petstore)
 
+# Header test
+#
+# prepare function argument(s)
 var_header_test_int <- 56 # integer | header test int
 
-# Header test
 api_instance <- PetApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -462,9 +476,11 @@ Update an existing pet
 ```R
 library(petstore)
 
+# Update an existing pet
+#
+# prepare function argument(s)
 var_pet <- Pet$new("name_example", list("photoUrls_example"), 123, Category$new(123, "name_example"), list(Tag$new(123, "name_example")), "available") # Pet | Pet object that needs to be added to the store
 
-# Update an existing pet
 api_instance <- PetApi$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
@@ -526,11 +542,13 @@ Updates a pet in the store with form data
 ```R
 library(petstore)
 
+# Updates a pet in the store with form data
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet that needs to be updated
 var_name <- "name_example" # character | Updated name of the pet (Optional)
 var_status <- "status_example" # character | Updated status of the pet (Optional)
 
-# Updates a pet in the store with form data
 api_instance <- PetApi$new()
 result <- tryCatch(
              api_instance$update_pet_with_form(var_pet_id, name = var_name, status = var_status),
@@ -583,11 +601,13 @@ uploads an image
 ```R
 library(petstore)
 
+# uploads an image
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet to update
 var_additional_metadata <- "additional_metadata_example" # character | Additional data to pass to server (Optional)
 var_file <- File.new('/path/to/file') # data.frame | file to upload (Optional)
 
-# uploads an image
 api_instance <- PetApi$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
diff --git a/samples/client/petstore/R-httr2/docs/StoreApi.md b/samples/client/petstore/R-httr2/docs/StoreApi.md
index 454f019b4d8fadb243f05edcc521b05567ac4dbd..c0453bb3610c2e7c3b32119679dfff38fe7dd9cc 100644
--- a/samples/client/petstore/R-httr2/docs/StoreApi.md
+++ b/samples/client/petstore/R-httr2/docs/StoreApi.md
@@ -21,9 +21,11 @@ For valid response try integer IDs with value < 1000. Anything above 1000 or non
 ```R
 library(petstore)
 
+# Delete purchase order by ID
+#
+# prepare function argument(s)
 var_order_id <- "order_id_example" # character | ID of the order that needs to be deleted
 
-# Delete purchase order by ID
 api_instance <- StoreApi$new()
 result <- tryCatch(
              api_instance$delete_order(var_order_id),
@@ -75,8 +77,9 @@ Returns a map of status codes to quantities
 ```R
 library(petstore)
 
-
 # Returns pet inventories by status
+#
+
 api_instance <- StoreApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -132,9 +135,11 @@ For valid response try integer IDs with value <= 5 or > 10. Other values will ge
 ```R
 library(petstore)
 
+# Find purchase order by ID
+#
+# prepare function argument(s)
 var_order_id <- 56 # integer | ID of pet that needs to be fetched
 
-# Find purchase order by ID
 api_instance <- StoreApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -193,9 +198,11 @@ Place an order for a pet
 ```R
 library(petstore)
 
+# Place an order for a pet
+#
+# prepare function argument(s)
 var_order <- Order$new(123, 123, 123, "shipDate_example", "placed", "complete_example") # Order | order placed for purchasing the pet
 
-# Place an order for a pet
 api_instance <- StoreApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
diff --git a/samples/client/petstore/R-httr2/docs/UserApi.md b/samples/client/petstore/R-httr2/docs/UserApi.md
index beba3ffadcae58d930e1b8a13e477b551e235ae6..7bb012fd1b47860d23add0b09c96a07987bc911e 100644
--- a/samples/client/petstore/R-httr2/docs/UserApi.md
+++ b/samples/client/petstore/R-httr2/docs/UserApi.md
@@ -25,9 +25,11 @@ This can only be done by the logged in user.
 ```R
 library(petstore)
 
+# Create user
+#
+# prepare function argument(s)
 var_user <- User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123) # User | Created user object
 
-# Create user
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -80,9 +82,11 @@ Creates list of users with given input array
 ```R
 library(petstore)
 
+# Creates list of users with given input array
+#
+# prepare function argument(s)
 var_user <- list(User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123)) # array[User] | List of user object
 
-# Creates list of users with given input array
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -135,9 +139,11 @@ Creates list of users with given input array
 ```R
 library(petstore)
 
+# Creates list of users with given input array
+#
+# prepare function argument(s)
 var_user <- list(User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123)) # array[User] | List of user object
 
-# Creates list of users with given input array
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -190,9 +196,11 @@ This can only be done by the logged in user.
 ```R
 library(petstore)
 
+# Delete user
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | The name that needs to be deleted
 
-# Delete user
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -246,9 +254,11 @@ Get user by user name
 ```R
 library(petstore)
 
+# Get user by user name
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | The name that needs to be fetched. Use user1 for testing.
 
-# Get user by user name
 api_instance <- UserApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -307,10 +317,12 @@ Logs user into the system
 ```R
 library(petstore)
 
+# Logs user into the system
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | The user name for login
 var_password <- "password_example" # character | The password for login in clear text
 
-# Logs user into the system
 api_instance <- UserApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -369,8 +381,9 @@ Logs out current logged in user session
 ```R
 library(petstore)
 
-
 # Logs out current logged in user session
+#
+
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -420,10 +433,12 @@ This can only be done by the logged in user.
 ```R
 library(petstore)
 
+# Updated user
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | name that need to be deleted
 var_user <- User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123) # User | Updated user object
 
-# Updated user
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
diff --git a/samples/client/petstore/R-httr2/docs/Zebra.md b/samples/client/petstore/R-httr2/docs/Zebra.md
index 84e4d20ce941a50eb71bbdf7ad083ddc7ca267bf..51b70941262177592584b2c875b06f0503c8e26e 100644
--- a/samples/client/petstore/R-httr2/docs/Zebra.md
+++ b/samples/client/petstore/R-httr2/docs/Zebra.md
@@ -4,7 +4,7 @@
 ## Properties
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
-**type** | **character** |  | [optional] 
+**type** | **character** |  | [optional] [Enum: [plains, mountain, grevys]] 
 **className** | **character** |  | 
 
 
diff --git a/samples/client/petstore/R/docs/Animal.md b/samples/client/petstore/R/docs/Animal.md
index 5cb0eb8bbf27b83fb5480f2f8f7a0c79b37db836..21af972e0f0dbe2b9d886aab3df98b5b1b235d70 100644
--- a/samples/client/petstore/R/docs/Animal.md
+++ b/samples/client/petstore/R/docs/Animal.md
@@ -5,6 +5,6 @@
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **className** | **character** |  | 
-**color** | **character** |  | [optional] [default to &quot;red&quot;]
+**color** | **character** |  | [optional] [default to &quot;red&quot;] 
 
 
diff --git a/samples/client/petstore/R/docs/Cat.md b/samples/client/petstore/R/docs/Cat.md
index ba23ea86a33efe7849a96082c6e1446725493287..9a717492c09c694a2a081f3757cdef54e22b9386 100644
--- a/samples/client/petstore/R/docs/Cat.md
+++ b/samples/client/petstore/R/docs/Cat.md
@@ -5,7 +5,7 @@
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **className** | **character** |  | 
-**color** | **character** |  | [optional] [default to &quot;red&quot;]
+**color** | **character** |  | [optional] [default to &quot;red&quot;] 
 **declawed** | **character** |  | [optional] 
 
 
diff --git a/samples/client/petstore/R/docs/Category.md b/samples/client/petstore/R/docs/Category.md
index 7fa99ae82e0f5a6aa2a00be0875875273d8ce6fe..41b20285b80a6003e0a68700d2f92b757830e6cb 100644
--- a/samples/client/petstore/R/docs/Category.md
+++ b/samples/client/petstore/R/docs/Category.md
@@ -6,6 +6,6 @@ A category for a pet
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **id** | **integer** |  | [optional] 
-**name** | **character** |  | [optional] 
+**name** | **character** |  | [optional] [Pattern: ^[a-zA-Z0-9]+[a-zA-Z0-9\\.\\-_]*[a-zA-Z0-9]+$] 
 
 
diff --git a/samples/client/petstore/R/docs/Dog.md b/samples/client/petstore/R/docs/Dog.md
index b2e732df451b9e92459a7e3a21c6c5a431593098..6893a5e18efcbb393d35bc19e6e9b1cdf8f667b2 100644
--- a/samples/client/petstore/R/docs/Dog.md
+++ b/samples/client/petstore/R/docs/Dog.md
@@ -5,7 +5,7 @@
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
 **className** | **character** |  | 
-**color** | **character** |  | [optional] [default to &quot;red&quot;]
+**color** | **character** |  | [optional] [default to &quot;red&quot;] 
 **breed** | **character** |  | [optional] 
 
 
diff --git a/samples/client/petstore/R/docs/FakeApi.md b/samples/client/petstore/R/docs/FakeApi.md
index fbc398cd8147cdb5a73b519de5f6820eeb946465..1d56f96dcc32a24c3ef1b550d6e73cfe48d2f7db 100644
--- a/samples/client/petstore/R/docs/FakeApi.md
+++ b/samples/client/petstore/R/docs/FakeApi.md
@@ -20,10 +20,12 @@ test data_file to ensure it's escaped correctly
 ```R
 library(petstore)
 
+# test data_file to ensure it's escaped correctly
+#
+# prepare function argument(s)
 var_dummy <- "dummy_example" # character | dummy required parameter
 var_var_data_file <- "var_data_file_example" # character | header data file (Optional)
 
-# test data_file to ensure it's escaped correctly
 api_instance <- FakeApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -81,9 +83,11 @@ test regular expression to ensure no exception
 ```R
 library(petstore)
 
+# test regular expression to ensure no exception
+#
+# prepare function argument(s)
 var_reg_exp_test <- "reg_exp_test_example" # character | dummy required parameter
 
-# test regular expression to ensure no exception
 api_instance <- FakeApi$new()
 result <- tryCatch(
              api_instance$FakeRegularExpression(var_reg_exp_test),
@@ -134,10 +138,12 @@ test set query parameter
 ```R
 library(petstore)
 
+# test set query parameter
+#
+# prepare function argument(s)
 var_set_dummy <- list("inner_example") # set[character] | set query
 var_array_dummy <- list("inner_example") # array[character] | array query
 
-# test set query parameter
 api_instance <- FakeApi$new()
 result <- tryCatch(
              api_instance$FakeSetQuery(var_set_dummy, var_array_dummy),
diff --git a/samples/client/petstore/R/docs/Mammal.md b/samples/client/petstore/R/docs/Mammal.md
index d9746cd2df19a63f714511231be93d0296230361..a2835af3f4f7be118ef1f471b8af340398116565 100644
--- a/samples/client/petstore/R/docs/Mammal.md
+++ b/samples/client/petstore/R/docs/Mammal.md
@@ -7,6 +7,6 @@ Name | Type | Description | Notes
 **hasBaleen** | **character** |  | [optional] 
 **hasTeeth** | **character** |  | [optional] 
 **className** | **character** |  | 
-**type** | **character** |  | [optional] 
+**type** | **character** |  | [optional] [Enum: [plains, mountain, grevys]] 
 
 
diff --git a/samples/client/petstore/R/docs/Order.md b/samples/client/petstore/R/docs/Order.md
index 2e41a351352bb774324219fe1d7e5cb9541d1dac..85860b2fb8969480b560d06d48e7c8409fce11ba 100644
--- a/samples/client/petstore/R/docs/Order.md
+++ b/samples/client/petstore/R/docs/Order.md
@@ -9,7 +9,7 @@ Name | Type | Description | Notes
 **petId** | **integer** |  | [optional] 
 **quantity** | **integer** |  | [optional] 
 **shipDate** | **character** |  | [optional] 
-**status** | **character** | Order Status | [optional] 
-**complete** | **character** |  | [optional] [default to FALSE]
+**status** | **character** | Order Status | [optional] [Enum: [placed, approved, delivered]] 
+**complete** | **character** |  | [optional] [default to FALSE] 
 
 
diff --git a/samples/client/petstore/R/docs/Pet.md b/samples/client/petstore/R/docs/Pet.md
index 63021a8294ada37d1603f6ba0fb424ee81b8a181..29186b2a14a3d9077ed9d93f4de73d5ec37911bb 100644
--- a/samples/client/petstore/R/docs/Pet.md
+++ b/samples/client/petstore/R/docs/Pet.md
@@ -10,6 +10,6 @@ Name | Type | Description | Notes
 **name** | **character** |  | 
 **photoUrls** | **array[character]** |  | 
 **tags** | [**array[Tag]**](Tag.md) |  | [optional] 
-**status** | **character** | pet status in the store | [optional] 
+**status** | **character** | pet status in the store | [optional] [Enum: [available, pending, sold]] 
 
 
diff --git a/samples/client/petstore/R/docs/PetApi.md b/samples/client/petstore/R/docs/PetApi.md
index 2dce1e400ddd2d6318d6a4f58745cf989e8cc3e4..c493fe2da37e091b0f620620b8afa9d2283545c1 100644
--- a/samples/client/petstore/R/docs/PetApi.md
+++ b/samples/client/petstore/R/docs/PetApi.md
@@ -27,9 +27,11 @@ Add a new pet to the store
 ```R
 library(petstore)
 
+# Add a new pet to the store
+#
+# prepare function argument(s)
 var_pet <- Pet$new("name_example", list("photoUrls_example"), 123, Category$new(123, "name_example"), list(Tag$new(123, "name_example")), "available") # Pet | Pet object that needs to be added to the store
 
-# Add a new pet to the store
 api_instance <- PetApi$new()
 # Configure HTTP basic authorization: http_auth
 api_instance$api_client$username <- Sys.getenv("USERNAME")
@@ -90,10 +92,12 @@ Deletes a pet
 ```R
 library(petstore)
 
+# Deletes a pet
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | Pet id to delete
 var_api_key <- "api_key_example" # character |  (Optional)
 
-# Deletes a pet
 api_instance <- PetApi$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
@@ -147,9 +151,11 @@ Multiple status values can be provided with comma separated strings
 ```R
 library(petstore)
 
+# Finds Pets by status
+#
+# prepare function argument(s)
 var_status <- list("available") # array[character] | Status values that need to be considered for filter
 
-# Finds Pets by status
 api_instance <- PetApi$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
@@ -209,9 +215,11 @@ Multiple tags can be provided with comma separated strings. Use tag1, tag2, tag3
 ```R
 library(petstore)
 
+# Finds Pets by tags
+#
+# prepare function argument(s)
 var_tags <- list("inner_example") # array[character] | Tags to filter by
 
-# Finds Pets by tags
 api_instance <- PetApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -269,9 +277,11 @@ Returns a single pet
 ```R
 library(petstore)
 
+# Find pet by ID
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet to return
 
-# Find pet by ID
 api_instance <- PetApi$new()
 # Configure HTTP bearer authorization: BearerToken
 api_instance$api_client$bearer_token <- Sys.getenv("BEARER_TOKEN")
@@ -332,9 +342,11 @@ Returns a single pet
 ```R
 library(petstore)
 
+# Find pet by ID (streaming)
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet to return
 
-# Find pet by ID (streaming)
 api_instance <- PetApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -397,9 +409,11 @@ Header test
 ```R
 library(petstore)
 
+# Header test
+#
+# prepare function argument(s)
 var_header_test_int <- 56 # integer | header test int
 
-# Header test
 api_instance <- PetApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -462,9 +476,11 @@ Update an existing pet
 ```R
 library(petstore)
 
+# Update an existing pet
+#
+# prepare function argument(s)
 var_pet <- Pet$new("name_example", list("photoUrls_example"), 123, Category$new(123, "name_example"), list(Tag$new(123, "name_example")), "available") # Pet | Pet object that needs to be added to the store
 
-# Update an existing pet
 api_instance <- PetApi$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
@@ -526,11 +542,13 @@ Updates a pet in the store with form data
 ```R
 library(petstore)
 
+# Updates a pet in the store with form data
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet that needs to be updated
 var_name <- "name_example" # character | Updated name of the pet (Optional)
 var_status <- "status_example" # character | Updated status of the pet (Optional)
 
-# Updates a pet in the store with form data
 api_instance <- PetApi$new()
 result <- tryCatch(
              api_instance$UpdatePetWithForm(var_pet_id, name = var_name, status = var_status),
@@ -583,11 +601,13 @@ uploads an image
 ```R
 library(petstore)
 
+# uploads an image
+#
+# prepare function argument(s)
 var_pet_id <- 56 # integer | ID of pet to update
 var_additional_metadata <- "additional_metadata_example" # character | Additional data to pass to server (Optional)
 var_file <- File.new('/path/to/file') # data.frame | file to upload (Optional)
 
-# uploads an image
 api_instance <- PetApi$new()
 # Configure OAuth2 access token for authorization: petstore_auth
 api_instance$api_client$access_token <- Sys.getenv("ACCESS_TOKEN")
diff --git a/samples/client/petstore/R/docs/StoreApi.md b/samples/client/petstore/R/docs/StoreApi.md
index d7e35f1614cc89164d47edd9e91ac77c469f8a3a..b58b49eb76292672e69116ee4bff8164633a778c 100644
--- a/samples/client/petstore/R/docs/StoreApi.md
+++ b/samples/client/petstore/R/docs/StoreApi.md
@@ -21,9 +21,11 @@ For valid response try integer IDs with value < 1000. Anything above 1000 or non
 ```R
 library(petstore)
 
+# Delete purchase order by ID
+#
+# prepare function argument(s)
 var_order_id <- "order_id_example" # character | ID of the order that needs to be deleted
 
-# Delete purchase order by ID
 api_instance <- StoreApi$new()
 result <- tryCatch(
              api_instance$DeleteOrder(var_order_id),
@@ -75,8 +77,9 @@ Returns a map of status codes to quantities
 ```R
 library(petstore)
 
-
 # Returns pet inventories by status
+#
+
 api_instance <- StoreApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -132,9 +135,11 @@ For valid response try integer IDs with value <= 5 or > 10. Other values will ge
 ```R
 library(petstore)
 
+# Find purchase order by ID
+#
+# prepare function argument(s)
 var_order_id <- 56 # integer | ID of pet that needs to be fetched
 
-# Find purchase order by ID
 api_instance <- StoreApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -193,9 +198,11 @@ Place an order for a pet
 ```R
 library(petstore)
 
+# Place an order for a pet
+#
+# prepare function argument(s)
 var_order <- Order$new(123, 123, 123, "shipDate_example", "placed", "complete_example") # Order | order placed for purchasing the pet
 
-# Place an order for a pet
 api_instance <- StoreApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
diff --git a/samples/client/petstore/R/docs/UserApi.md b/samples/client/petstore/R/docs/UserApi.md
index b128ef520df51f2e7fe28627e4bd47960280eac7..ffc5e09b9e636d64abfd54a7d4aba73d70a2197c 100644
--- a/samples/client/petstore/R/docs/UserApi.md
+++ b/samples/client/petstore/R/docs/UserApi.md
@@ -25,9 +25,11 @@ This can only be done by the logged in user.
 ```R
 library(petstore)
 
+# Create user
+#
+# prepare function argument(s)
 var_user <- User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123) # User | Created user object
 
-# Create user
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -80,9 +82,11 @@ Creates list of users with given input array
 ```R
 library(petstore)
 
+# Creates list of users with given input array
+#
+# prepare function argument(s)
 var_user <- list(User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123)) # array[User] | List of user object
 
-# Creates list of users with given input array
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -135,9 +139,11 @@ Creates list of users with given input array
 ```R
 library(petstore)
 
+# Creates list of users with given input array
+#
+# prepare function argument(s)
 var_user <- list(User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123)) # array[User] | List of user object
 
-# Creates list of users with given input array
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -190,9 +196,11 @@ This can only be done by the logged in user.
 ```R
 library(petstore)
 
+# Delete user
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | The name that needs to be deleted
 
-# Delete user
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -246,9 +254,11 @@ Get user by user name
 ```R
 library(petstore)
 
+# Get user by user name
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | The name that needs to be fetched. Use user1 for testing.
 
-# Get user by user name
 api_instance <- UserApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -307,10 +317,12 @@ Logs user into the system
 ```R
 library(petstore)
 
+# Logs user into the system
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | The user name for login
 var_password <- "password_example" # character | The password for login in clear text
 
-# Logs user into the system
 api_instance <- UserApi$new()
 result <- tryCatch(
              # to save the result into a file, simply add the optional `data_file` parameter, e.g.
@@ -369,8 +381,9 @@ Logs out current logged in user session
 ```R
 library(petstore)
 
-
 # Logs out current logged in user session
+#
+
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
@@ -420,10 +433,12 @@ This can only be done by the logged in user.
 ```R
 library(petstore)
 
+# Updated user
+#
+# prepare function argument(s)
 var_username <- "username_example" # character | name that need to be deleted
 var_user <- User$new(123, "username_example", "firstName_example", "lastName_example", "email_example", "password_example", "phone_example", 123) # User | Updated user object
 
-# Updated user
 api_instance <- UserApi$new()
 # Configure API key authorization: api_key
 api_instance$api_client$api_keys["api_key"] <- Sys.getenv("API_KEY")
diff --git a/samples/client/petstore/R/docs/Zebra.md b/samples/client/petstore/R/docs/Zebra.md
index 84e4d20ce941a50eb71bbdf7ad083ddc7ca267bf..51b70941262177592584b2c875b06f0503c8e26e 100644
--- a/samples/client/petstore/R/docs/Zebra.md
+++ b/samples/client/petstore/R/docs/Zebra.md
@@ -4,7 +4,7 @@
 ## Properties
 Name | Type | Description | Notes
 ------------ | ------------- | ------------- | -------------
-**type** | **character** |  | [optional] 
+**type** | **character** |  | [optional] [Enum: [plains, mountain, grevys]] 
 **className** | **character** |  |