odfWeave, option de mise en page

[Guillaume Bal]

Bonjour,

J'utilise depuis peu la fonction odfWeave pour créer des rapports et j'ai un souci de mise en page dans le fichier final.
Je m'explique. Lorsque j'utilise la fonction summary sur ma base de données (pour chaque colonne vous avez l'année puis en dessous les températures des jours) directement dans la console R, j'obtiens des résultats bien alignés, facilement lisibles et identifiables.
Le problème c'est que la mise en forme que j'obtiens dans mon fichier *.odt à la sortie (via odfWeave) n'est pas terrible (alignements non respectés...) et ça devient illisible.
J'en arrive donc à ma question : y a t il une option qui me permette de garder la même mise en page que dans R ou bien une toute autre astuce?

Merci d'avance pour votre aide

PS: message peut etre un peu long mais je préfère être clair

[François Bonnot]

Bonjour,
Cela dépend de la classe de summary(objet) (qui je crois dépend de la classe de l'objet). Lorsque cette classe est "table" j'utilise le code suivant:

Code : Tout sélectionner

res <- summary(objet)
class(res) <- "matrix"
odfTable(res)


FB

[Guillaume Bal]

Merci pour votre réponse.
J'arrive désormais à obtenir un tableau "propre".
Toutefois il me reste un problème pour lequel je ne trouve pas la solution sur internet. Comment faire en sorte que la largeur des colonnes soit directement ajustée au contenu et que les tableau soit "renvoyé à la ligne" qd nécessaire?
J'ai regarder les options de style pour les tableaux mais je ne vois pas.
J'utilise donc simplement pour l'instant:

<<echo=FALSE, results=xml>>=
resume<-summary(data)
class(resume) <- "matrix"
odfTable(resume)
@

Merci pour vote aide

[/quote][/list]

[Guillaume Bal]

Pour illustrer mon pb j'obtiens ça:



(C'est une partie seulement)

[François Bonnot]

Je ne pense pas que odfWeave gère cela, si ce n'est pas le cas on peut facilement le programmer. Par exemple pour éditer un tableau de 20 colonnes en 2 sous-tableaux:

Code : Tout sélectionner

<<echo=FALSE, results=xml>>=
resume<-summary(data)
class(resume) <- "matrix"
r1 <- resume [,1:10]
r2 <- resume [,11:20]
odfTable(r1)
odfTable(r2)
@

Bien évidemment il faut écrire une fonction qui gère le cas général (avec un paramètre largeur max d'un sous-tableau par exemple).

FB

[Guillaume Bal]

Bonjour,

Une autre question. Quelqu'un pourrait-il me donner un exemple de code pour changer la taille de la police dans un tableau (tjs via odfWeave)?
Je n'arrive pas à utiliser getStyleDefs ou tableStyles.

Merci pour votre aide

[Renaud Lancelot]

Merci de commencer un nouveau fil quand vous changez de sujet.

Renaud