Obtendo a Entrada do Usuário

Parte da seção Fundamentos do Journey de R da Coddy — lição 34 de 78.

Desafio

Fácil

Na lição anterior, você criou uma mensagem de boas-vindas para a Calculadora de Divisão de Conta. Agora, adicione a funcionalidade para coletar a entrada do usuário para o cálculo da conta.

Após a sua mensagem de boas-vindas existente, leia três entradas do usuário:

O valor total da conta
A porcentagem da gorjeta (como um número inteiro, por exemplo, 15 para 15%)
O número de pessoas dividindo a conta

Em scripts R que rodam de forma não interativa (como nesta plataforma), a entrada é lida do fluxo de entrada padrão (standard input stream). Para fazer isso, primeiro abra uma conexão com stdin usando file(), depois leia cada linha com readLines() e feche a conexão quando terminar:

con <- file("stdin", "r")
bill <- as.numeric(suppressWarnings(readLines(con, n = 1)))
tip_percent <- as.numeric(suppressWarnings(readLines(con, n = 1)))
people <- as.numeric(suppressWarnings(readLines(con, n = 1)))
close(con)

Aqui está o que cada parte faz:

file("stdin", "r") — abre o fluxo de entrada padrão para leitura e o armazena em con
readLines(con, n = 1) — lê exatamente uma linha dessa conexão
suppressWarnings(...) — silencia avisos inofensivos que aparecem ao ler de stdin desta forma
as.numeric(...) — converte a entrada de texto em um número
close(con) — fecha a conexão após todas as entradas serem lidas

Armazene os três valores em variáveis chamadas bill, tip_percent e people.

Após ler as entradas, exiba uma mensagem de confirmação mostrando o que foi inserido no seguinte formato:

Bill: $[bill]
Tip: [tip_percent]%
People: [people]

Use cat() para todas as saídas e inclua caracteres de nova linha \n onde for necessário. Use sep = "" em cada chamada de cat() para evitar espaços indesejados.

Por exemplo, se as entradas forem 120, 18 e 4, a saída completa deve ser:

Welcome to the Bill Split Calculator!
Let's split your bill fairly.
Bill: $120
Tip: 18%
People: 4

Experimente você mesmo

# TODO: Write your code below
# Use cat() to display the welcome message
# Remember to use \n for new lines
cat("Welcome to the Bill Split Calculator!\nLet's split your bill fairly.\n")