fonction table

[yan BAUMANN]

Bonjour à toutes et à tous

je souhaite avoir des éléments statistiques sur des données avec la fonction table.
et je souhaite imprimer le résultat de la table

voici mon script

############################DEBUT_SCRIPT###########################

#change et verifier le dossier de travailsetwd
setwd("D:/R")
getwd()

#initilaise la mémoire
rm(list=ls())
#charge le package foreign
library(foreign)


########################################################################################################################################
###########################################enquete pkviti##########################################################################
########################################################################################################################################

# lit le ficier exporte depuis csv
ND_brutviti <- read.csv("PHYTO_exploitations.csv")

#compte nb lignes
nrow(ND_brutviti)
attach(ND_brutviti)


#selectionne que la region provence
prov=ND_brutviti[reg==93,]
nrow(prov)
ncol(prov)
head(prov)
detach(ND_brutviti)
attach(prov)

#selectionne que fruit
fruit=prov[CHAMP3=="volet abrico",]
nrow(fruit)
ncol(fruit)
head(fruit)
detach(prov)
attach(fruit)

#selectionne que caractéristique de conduite

table(fruit)

table(fruit)
Error in table(fruit) :
tentative de création d'une table contenant 2^31 éléments ou plus
>
comment puis avoir les éléments de la fonction table
et comment imprimer les données des fonctions table et summary

bonne journée et merci beaucoup

yan

[Serge Rapenne]

Bonjour,

Tout d'abord merci d'utiliser les balises code

Code : Tout sélectionner

(bouton "code") autour du code pour rendre tes messages plus lisible.

D’après ton code "fruit" est un data.frame. La fonction table va réaliser une table de contingence entre toutes les colonnes de ce data.frame. Si ce data.frame a beaucoup de colonne, la taille de la sortie va vite exploser (la taille de la sortie va être égale au produit du nombre de valeurs différentes dans chaque colonne) et personnellement je n'ai jamais eu besoin de table de contingence sur plus de 4 variables.

Remarque complémentaire: la fonction attach est un vrai nid à problème, il est préférable d'écrire des choses du style

Code : Tout sélectionner

fruit=prov[prov$CHAMP3=="volet abrico",]
#ou
fruit=with(prov,prov[CHAMP3=="volet abrico",])

Serge