# Load your data.
load('immdata.rda')
# Perform intersection by amino acid sequences with V-segments.
imm.av <- intersect(immdata, 'ave')
# Plot a heatmap.
vis.heatmap(imm.av, .title = 'Immdata - (ave)-intersection')
Run the code above in your browser using DataLab