সোয়েভ এবং xtable দিয়ে রঙিন টেবিলগুলি কীভাবে তৈরি করবেন? [বন্ধ]


17

আমি রিপোর্ট তৈরি করতে সোয়েভ এবং অষ্টেবল ব্যবহার করছি ।

আমি একটি টেবিলে কিছু রঙ যুক্ত করতে চাই। তবে আমি xtable সহ রঙিন টেবিলগুলি তৈরি করার কোনও উপায় খুঁজে নিতে সক্ষম হইনি।

অন্য কোন বিকল্প আছে?


রঙিন টেবিল কি? রঙের পটভূমি সহ কোষগুলি? সেল টেক্সট বিভিন্ন রঙ? শেষ দৃশ্যে, সমাধানটি উপযুক্ত টেক্সট কমান্ডের সাহায্যে মানগুলি মোড়ানো হতে পারে।
এমপিটকাস

নির্দিষ্ট রঙের হতে আমার এক সারির পটভূমি দরকার need আমাকে কি অস্টেবল ফাংশনটি আবার লিখতে হবে?
রকসায়েন্স

1
xtable ইতিমধ্যে R প্যাকেজ Hmisc এর ল্যাটেক্স ফাংশন হিসাবে আবার (বা সম্ভবত প্রাক-লিখিত) পুনরায় লেখা হয়েছে । সঠিকভাবে সারণীগুলির জন্য আমি ব্যক্তিগতভাবে শপথ করি। নীচে বর্ণিত অভিনব সন্নিবেশ কৌশলটির জন্য এটির জায়গা আছে কিনা আমি তা পরীক্ষা করে দেখিনি, যদিও আমি তা না পারলে অবাক হব।
কনজুগেটপায়ার

@ কনজুগেট আপনি ঠিক বলেছেন, যদিও এটি এতটা সোজা নয় যেটা আমি ভেবে দেখতাম; আমি আপনার পরামর্শ দিয়ে আমার প্রতিক্রিয়া আপডেট করেছি।
chl

@ সিএল 'সোজা নয়' একটি সংক্ষিপ্তসার। এই ফাংশনটি একটি জন্তু, যদিও একটি খুব সক্ষম।
কনজুগেটপায়ার

উত্তর:


20

যদিও আমি স্পষ্টভাবে আর সঙ্গে থেকে এই চেষ্টা করা হয়নি (আমি সাধারণত পোষ্ট প্রক্রিয়ার ক্ষীর মধ্যে টেবিল সরাসরি \rowcolor, \rowcolorsঅথবা colortbl প্যাকেজ), আমার মনে হয় এটা সহজ সঙ্গে বাজানো দ্বারা এই কাজ করতে হবে add.to.rowআর্গুমেন্ট print.xtable()। এটি মূলত দুটি উপাদান আশা করে (হিসাবে পাস হয়েছে list): (1) সারি সংখ্যা, এবং (2)এলএকজনটিএক্সকমান্ড। দয়া করে নোট করুন যে সুনির্দিষ্ট নির্দিষ্ট সারি (গুলি) এর শেষে যুক্ত করা হয়েছে।

এটি colortblপ্যাকেজ সহ, কাজ করে বলে মনে হচ্ছে । সুতরাং, এই মত কিছু

<<result=tex>>
library(xtable)
m <- matrix(sample(1:10,10), nr=2)
print(xtable(m), add.to.row=list(list(1),"\\rowcolor[gray]{.8} "))
@

আমাকে দেয়

enter image description here

(This is a customized Beamer template, but this should work with a standard document. With Beamer, you'll probably want to add the table option when loading the package.)

Update:

Following @Conjugate's suggestion, you can also rely on Hmisc facilities for handling TEX output, see the many options of the latex() function. Here is an example of use:

library(Hmisc)
## print the second row in bold (including row label)
form.mat <- matrix(c(rep("", 5), rep("bfseries", 5)), nr=2, byrow=TRUE)
w1 <- latex(m, rownamesTexCmd=c("","bfseries"), cellTexCmds=form.mat, 
            numeric.dollar=FALSE, file='/tmp/out1.tex')
w1  # call latex on /tmp/out1.tex
## highlight the second row in gray (as above)
w2 <- latex(m, rownamesTexCmd=c("","rowcolor[gray]{.8}"), 
            numeric.dollar=FALSE, file='/tmp/out2.tex')
w2
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.