Anonymous user
Temperature conversion: Difference between revisions
R language
mNo edit summary |
(R language) |
||
Line 3,585:
-421.87 degrees Fahrenheit
37.8 degrees Rankine</pre>
=={{header|R}}==
<lang R>convert_Kelvin <- function(K){
if (!is.numeric(K))
stop("\n Input has to be numeric")
return(list(
Kelvin = K,
Celsius = K - 273.15,
Fahreneit = K * 1.8 - 459.67,
Rankine = K * 1.8
))
}
convert_Kelvin(21)
</lang>
{{out}}
<pre>
$Kelvin
[1] 21
$Celsius
[1] -252.15
$Fahreneit
[1] -421.87
$Rankine
[1] 37.8
</pre>
=={{header|Racket}}==
| |||