normalize: normalize function ...

Description Usage Arguments Examples

View source: R/gbod.R

Description

This function normalizes all the values to scale 10 ~

Usage

1
normalize(df, n = 10, rename = TRUE)

Arguments

df

agata dataframe with ertrag and durchsatz columns

n

Grid scale

rename

if rename is ture, then each column name will be appended with a surfix "_norm"~~

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (df, n = 10, rename = TRUE) 
{
    df_norm = df
    df_max_ertrag <- max(df$ertrag, na.rm = TRUE)
    df_min_ertrag <- min(df$ertrag, na.rm = TRUE)
    df_norm$ertrag <- (df$ertrag - df_min_ertrag) * n/(df_max_ertrag - 
        df_min_ertrag)
    df_max_durchsatz <- max(df$durchsatz, na.rm = TRUE)
    df_min_durchsatz <- min(df$durchsatz, na.rm = TRUE)
    df_norm$durchsatz <- (df$durchsatz - df_min_durchsatz) * 
        n/(df_max_durchsatz - df_min_durchsatz)
    if (rename == TRUE) 
        colnames(df_norm) <- paste("norm", colnames(df_norm), 
            sep = "_")
    return(df_norm)
  }

p-jayanna/gbod documentation built on May 5, 2019, 9:02 p.m.