Central product classification

[show] This page is a knowledge crystal of subtype variable. The page identifier is Op_en5914
Moderator:Jouni (see all)
Upload data {{#opasnet_base_link:Op_en5914}}

Question

What is a good classification system for products?

Answer

⇤--#: . Something wrong with the first-level codes (there is a leading zero although should not be). This was corrected, but is there more problems with the data? --Jouni (talk) 23:05, 27 December 2013 (EET) (type: truth; paradigms: science: attack)

+ Show code- Hide code library(OpasnetUtils) objects.latest("Op_en5914", code_name = "initiate") CPC <- EvalOutput(CPC) oprint(CPC@output[CPC@output$CPC.level < 3 , ]) oprint(head(CPC@output))

Which class do you want to see in detail?: + Show code- Hide code library(OpasnetUtils) objects.latest("Op_en5914", code_name = "initiate") CPC <- EvalOutput(CPC) oprint(CPC@output[regexpr(class, CPC@output$CPC.code) == 1 , ])

Rationale

UN CPC version 2 seems to be an optimal choice. [1] [2]

Calculations

+ Show code- Hide code library(OpasnetUtils) dat <- opbase.data("Op_en5914") dat$CPC.name <- dat$Result temp <- levels(dat$CPC.name) temp <- gsub("\r", "", temp) levels(dat$CPC.name) <- temp dat$Result <- 1 temp2 <- as.character(levels(dat$CPC.code)[dat$CPC.code]) temp2[c(318, 416, 1016, 1734)] <- c("1", "2", "3", "4") dat$CPC.code <- as.factor(temp2) dat$CPC.level <- nchar(temp2) CPC <- Ovariable("CPC", data = dat) objects.store(CPC) cat("Ovariable CPC created.\n")

Related files

<mfanonymousfilelist></mfanonymousfilelist>