Cómo adaptar la función addpercent en r

Video: Graficas en [R] Función Points

Supongamos que usted quiere ser capaz de pegar el signo de porcentaje a los vectores de caracteres con el addPercent función. Un vector de caracteres dará un error en el momento que intenta multiplicar, por lo que necesita para otra función que, como el siguiente:

addPercent.character lt; - función (x) {pasta (x,"%", Sep =")}

Tenga en cuenta que el tipo de objeto no es sino vectorial carácter. De la misma manera, también hay que cambiar el nombre del original addPercent función para addPercent.numeric en el script.

Si utiliza el sistema de despacho método, puede mantener todas las funciones en un solo archivo de comandos si no son demasiado grandes. De esta manera, se tiene a la fuente de un solo archivo de comandos con el fin de tener todo el trabajo sistema genérico.

Todo lo que necesita ahora es un genérico addPercent () función como esta:

Video: Bucles for en R (Y como no usarlos)

addPercent lt; - función (x, ...) {UseMethod ("addPercent")}

Utiliza sólo dos argumentos aquí: x y los puntos (...). El uso del argumento puntos asegura que aún puede utilizar todos los argumentos de la addPercent.numeric () en función de su llamada a addPercent (). Los argumentos extra simplemente se pasan al método apropiado mediante el argumento puntos.

Video: Graficando usando [R] Basico

Después de enviar el archivo de secuencia de comandos completa a la consola, puede enviar los dos vectores de caracteres y vectores numéricos a addPercent (), Me gusta esto:

gt; addPercent (new.numbers, FUN = planta) [1] "82%" "2%" "162%" "40%"gt; addPercent (letras [1: 6]) [1] "un%" "segundo%" "do%" "re%" "mi%" "F%"