test_method <- function(arg_1, arg_2) {
	result <- arg_1 + arg_2
	return(result)
}

test_kwargs <- function(arg_1 = 1, arg_2 = 1) {
	result <- arg_1 * arg_2
	return(result)
}