Création de fonctions sur R

Bonjour à tous,

Je dispose de données de panel à l'échelle parcellaire concernant différentes productions(blé, mais, céréales...etc) de 2006 à 2011 pour différentes communes.
Je voudrais créer une fonction sur R qui puisse rendre compte du changement d'usage du sol c'est à dire par exemple voir que 20% des parcelles de blé en 2006 a éte consacrée à la production de mais.
Je dispose des variables sur les communes (id) et sur les parcelles: types de culture(blé, céréale, mais....)

Merci de votre aide

Ce que tu veux faire n'est pas évident, il faudrait peut-être préciser un peu. Pour ce qui est de la question précise, pas besoin de créer une fonction pour ça, tu peux faire quelque chose comme ça:

Code:

---

1 2	d <- data.frame(an = c("2000", "2000", "2001", "2001", "2001"), type = c("mais", "mais", "blé", "orge", "mais"), par = c("a", "b", "a", "b", "c")) round(prop.table(table(d$type, d$an), margin = 2) * 100, digits = 1)

---

ça te donne un tableau de proportion des différents types de cultures selon les années (ici avec les proportions en colonne).

Merci d'abord d'avoir répondu.
En fait ce que mon problème c'est surtout comment faire une fonction qui puisse effectuer des calculs entre les différentes tables de données(2006 à 2011).
Par exemple calculer la variation de la surface consacrée à un type de culture donnée (calculer la variation de la surface consacrée à la culture de blé entre 2006 et 2007 par exemple).
Est ce que c'est possible de faire de tels calculs à partir d'une fonction??

un truc comme ça peut-être?

Code:

---

1 2 3

d2000 <- data.frame(type = c("mais", "mais", "blé", "orge", "mais"), par = c("a", "b", "c", "d", "e")) d2001 <- data.frame(type = c("mais", "blé", "blé", "orge", "orge"), par = c("a", "b", "c", "d", "e")) round(prop.table(table(d2000$type)) * 100 - prop.table(table(d2001$type)) * 100, digits = 1)

---

qui peut sans doute en creusant un peu se convertir en fonction à qui tu donnes comme argument les tables à comparer.

Ok merci beaucoup je vais partir de vos propositions pour essayer de construire ma fonction.
En tout cas merci encore une fois pour votre aide.